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

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"
}