diff options
author | nijtmans <nijtmans> | 2010-05-03 11:37:32 (GMT) |
---|---|---|
committer | nijtmans <nijtmans> | 2010-05-03 11:37:32 (GMT) |
commit | fd1bb5e2a2a81897608067cf5b4cfcddd0d0a923 (patch) | |
tree | d300b025de9fca12253e41cb940ebf350bd07c14 /tools/fix_tommath_h.tcl | |
parent | 6230a4e9d34a3ea0b2dfc9ce47f0ab34e6ed9b81 (diff) | |
download | tcl-fd1bb5e2a2a81897608067cf5b4cfcddd0d0a923.zip tcl-fd1bb5e2a2a81897608067cf5b4cfcddd0d0a923.tar.gz tcl-fd1bb5e2a2a81897608067cf5b4cfcddd0d0a923.tar.bz2 |
Use "tclIO.h" and "tclTomMathDecls.h" everywhere
Diffstat (limited to 'tools/fix_tommath_h.tcl')
-rwxr-xr-x | tools/fix_tommath_h.tcl | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/tools/fix_tommath_h.tcl b/tools/fix_tommath_h.tcl index 9b2d258..47d6447 100755 --- a/tools/fix_tommath_h.tcl +++ b/tools/fix_tommath_h.tcl @@ -8,7 +8,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: fix_tommath_h.tcl,v 1.6 2007/02/14 17:59:22 kennykb Exp $ +# RCS: @(#) $Id: fix_tommath_h.tcl,v 1.7 2010/05/03 11:40:06 nijtmans Exp $ # #---------------------------------------------------------------------- @@ -25,7 +25,8 @@ foreach line [split $data \n] { {#define BN_H_} { puts $line puts {} - puts "\#include <tclTomMathDecls.h>" + puts "\#include \"tclInt.h\"" + puts "\#include \"tclTomMathDecls.h\"" puts "\#ifndef MODULE_SCOPE" puts "\#define MODULE_SCOPE extern" puts "\#endif" @@ -79,6 +80,9 @@ foreach line [split $data \n] { puts "[string map {__x86_64__ NEVER} $line]\ /* 128-bit ints fail in too many places */" } + {#include} { + # remove all includes + } default { puts $line } |