Diff

Differences From Artifact [790f1d50be]:

To Artifact [271d570bc1]:


65
66
67
68
69
70
71

72
73
74
# New API
set handle [tcc4tcl::new]
$handle cproc test5 {int i} int { return(i + 42); }
if {[$handle code] == ""} {
	error "[list $handle code] did not give code output"
}
$handle cproc test6 {int i} int { return(i + 42); }

$handle go
puts [test5 1]
puts [test6 1]







>



65
66
67
68
69
70
71
72
73
74
75
# New API
set handle [tcc4tcl::new]
$handle cproc test5 {int i} int { return(i + 42); }
if {[$handle code] == ""} {
	error "[list $handle code] did not give code output"
}
$handle cproc test6 {int i} int { return(i + 42); }
$handle add_library_path .
$handle go
puts [test5 1]
puts [test6 1]