Artifact 67f0fe40371148d7a4bf8c4ef42d6209f7a72a46:

• Executable file test — part of check-in [a972717fe8] at 2014-06-15 19:56:23 on branch trunk — Cleanup (user: rkeene, size: 296) [annotate] [blame] [check-ins using]

#! /usr/bin/env tclsh

lappend auto_path [lindex $argv 0]
package require tcc4tcl

tcc4tcl::cproc test {int i} int { return(i+42); }
tcc4tcl::cproc test1 {int i} int { return(i+42); }
tcc4tcl::cproc ::bob::test1 {int i} int { return(i+42); }

puts [test 1]
puts [::test1 1]
puts [::bob::test1 1]