Diff

Differences From Artifact [991d4e1c6b]:

To Artifact [a5b9327e8f]:


     6      6   
     7      7   	set dir [file dirname [info script]]
     8      8   
     9      9   	if {[info command ::tcc4tcl] == ""} {
    10     10   		catch { load {} tcc4tcl }
    11     11   	}
    12     12   	if {[info command ::tcc4tcl] == ""} {
    13         -		load [file join $dir tcc4tcl[info sharedlibextension]] tcc4tcl
           13  +		catch {
           14  +			load [file join $dir tcc4tcl[info sharedlibextension]] tcc4tcl
           15  +		}
    14     16   	}
    15     17   
    16     18   	set count 0
    17     19   
    18     20   	proc lookupNamespace {name} {
    19     21   		if {![string match "::*" $name]} {
    20     22   			set nsfrom [uplevel 2 {namespace current}]