Diff

Differences From Artifact [991d4e1c6b]:

To Artifact [a5b9327e8f]:


6
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 lookupNamespace {name} {
		if {![string match "::*" $name]} {
			set nsfrom [uplevel 2 {namespace current}]    







>
|
>







6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

	set dir [file dirname [info script]]

	if {[info command ::tcc4tcl] == ""} {
		catch { load {} tcc4tcl }
	}
	if {[info command ::tcc4tcl] == ""} {
		catch {
			load [file join $dir tcc4tcl[info sharedlibextension]] tcc4tcl
		}
	}

	set count 0

	proc lookupNamespace {name} {
		if {![string match "::*" $name]} {
			set nsfrom [uplevel 2 {namespace current}]