All the runtime scripts are called runme.tcl now for easier testing

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@5651 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2004-01-20 21:22:56 +00:00
commit 8d4c509404
22 changed files with 34 additions and 22 deletions

View file

@ -0,0 +1,24 @@
# file: runme.tcl
# Try to load as a dynamic module.
catch { load ./example[info sharedlibextension] example}
# Call our gcd() function
set x 42
set y 105
set g [gcd $x $y]
puts "The gcd of $x and $y is $g"
# call the gcdmain
gcdmain "gcdmain 42 105"
# call count
set c [count "Hello World" l]
puts $c
# call capitalize
set c [capitalize "helloworld"]
puts $c