tcc4tcl Examples

Simple Example

#! /usr/bin/env tclsh

package require tcc4tcl
set handle [tcc4tcl::new]
$handle cproc add {int a int b} long { return(a+b); }
puts [add 1 2]

More Complete Example

#! /usr/bin/env tclsh

package require tcc4tcl
set handle [tcc4tcl::new]
...in progress...