Diff

Differences From Artifact [c6ec4386d1]:

To Artifact [3622379b6b]:


7
8
9
10
11
12
13



14
15
16
17
18
19
20
	set dir [file dirname [info script]]
	if {[info command ::tcc4tcl] == ""} {
		catch { load {} tcc4tcl }
	}
	if {[info command ::tcc4tcl] == ""} {
		load [file join $dir tcc4tcl[info sharedlibextension]] tcc4tcl
	}




	set count 0

	proc new {{output ""} {pkgName ""}} {
		variable dir
		variable count








>
>
>







7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
	set dir [file dirname [info script]]
	if {[info command ::tcc4tcl] == ""} {
		catch { load {} tcc4tcl }
	}
	if {[info command ::tcc4tcl] == ""} {
		load [file join $dir tcc4tcl[info sharedlibextension]] tcc4tcl
	}
	if {[info command ::tcc4tcl] == ""} {
		error "Unable to load tcc4tcl shared library"
	}

	set count 0

	proc new {{output ""} {pkgName ""}} {
		variable dir
		variable count