summaryrefslogtreecommitdiffstats
path: root/tools/fix_tommath_h.tcl
diff options
context:
space:
mode:
authornijtmans <nijtmans>2010-05-03 11:37:32 (GMT)
committernijtmans <nijtmans>2010-05-03 11:37:32 (GMT)
commitfd1bb5e2a2a81897608067cf5b4cfcddd0d0a923 (patch)
treed300b025de9fca12253e41cb940ebf350bd07c14 /tools/fix_tommath_h.tcl
parent6230a4e9d34a3ea0b2dfc9ce47f0ab34e6ed9b81 (diff)
downloadtcl-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-xtools/fix_tommath_h.tcl8
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
}