update swig on windows
This commit is contained in:
24
winx64/bin/swigwin-4.0.0/Examples/tcl/multimap/runme.tcl
Normal file
24
winx64/bin/swigwin-4.0.0/Examples/tcl/multimap/runme.tcl
Normal 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
|
||||
|
||||
Reference in New Issue
Block a user