diff options
Diffstat (limited to 'tools/findBadExternals.tcl')
| -rwxr-xr-x | tools/findBadExternals.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tools/findBadExternals.tcl b/tools/findBadExternals.tcl index 2351cd2..7592f17 100755 --- a/tools/findBadExternals.tcl +++ b/tools/findBadExternals.tcl @@ -1,5 +1,5 @@ # findBadExternals.tcl -- -# +# # This script scans the Tcl load library for exported symbols # that do not begin with 'Tcl' or 'tcl'. It reports them on the # standard output. It is used to make sure that the library does @@ -10,7 +10,7 @@ # # tclsh findBadExternals.tcl /path/to/tclXX.so-or-.dll # -# Copyright © 2005 George Peter Staplin and Kevin Kenny +# Copyright (c) 2005 George Peter Staplin and Kevin Kenny # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. @@ -29,7 +29,7 @@ proc main {argc argv} { macosx { set status [catch { exec nm --extern-only --defined-only [lindex $argv 0] - } result] + } result] } windows { set status [catch { |