Differences From Artifact [907e91664c]:
- Executable file test.tcl — part of check-in [9d947ddc1d] at 2014-07-16 14:32:46 on branch trunk — Updated to include Tcl runtime in lib search path (user: rkeene, size: 3825) [annotate] [blame] [check-ins using]
To Artifact [635afa0e0c]:
- Executable file test.tcl — part of check-in [37f218e272] at 2014-07-16 16:15:56 on branch trunk — Corrected issue with checking for variables (user: rkeene, size: 3937) [annotate] [blame] [check-ins using]
︙ | ︙ | |||
164 165 166 167 168 169 170 | set handle [tcc4tcl::new] $handle proc callToTcl1 {int x} float { return 0.1 } $handle cwrap callToTcl1 {int x} float $handle go puts [callToTcl1 3] | > > > > > | 164 165 166 167 168 169 170 171 172 173 174 175 | set handle [tcc4tcl::new] $handle proc callToTcl1 {int x} float { return 0.1 } $handle cwrap callToTcl1 {int x} float $handle go puts [callToTcl1 3] set handle [tcc4tcl::new] $handle proc callToTclBinary {char* blob int blob_Length} ok { puts "Blob: $blob" } |