Differences From Artifact [3226475418]:
- Executable file test.tcl — part of check-in [6641266e0b] at 2017-10-13 19:59:57 on branch trunk — Fixed typo and added test for process_command_line (user: rkeene, size: 5278) [annotate] [blame] [check-ins using]
To Artifact [63a2456439]:
- Executable file test.tcl — part of check-in [f6d387c96c] at 2017-10-13 20:34:02 on branch trunk — Added enough critcl to be handle tcllib (user: rkeene, size: 5444) [annotate] [blame] [check-ins using]
︙ | |||
223 224 225 226 227 228 229 230 | 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 | + + + + + + + + + + + | return(TCL_OK); } $handle go if {[testCCommand] ne "OKAY"} { error "\[testCCommand\] Invalid result" } # Critcl test package require -exact critcl 0 critcl::ccode { #define test 1234 } critcl::cproc test14 {int x} int { return(x + test); } puts "Test14: [test14 3]" exit 0 |