1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
#! /usr/bin/env tclsh
#package require -exact critcl 0
catch {
source tcc4tcl.tcl
}
package provide tcc4tcl 0
catch {
source tcc4critcl.tcl
} err
# Emit a library by default
set packageName "PACKAGENAME"
set packageVersion "0"
set outputMode "library"
proc ::critcl::_allocateHandle {} {
|
|
|
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
#! /usr/bin/env tclsh
#package require -exact critcl 0
catch {
source ../tcc4tcl.tcl
}
package provide tcc4tcl 0
catch {
source ../tcc4critcl.tcl
} err
# Emit a library by default
set packageName "PACKAGENAME"
set packageVersion "0"
set outputMode "library"
proc ::critcl::_allocateHandle {} {
|