Hex Artifact Content

Artifact 69126671a02c9758c7e3f1ff8bb66ca25a592727:


0000: 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64  package ifneeded
0010: 20 74 6c 73 20 40 50 41 43 4b 41 47 45 5f 56 45   tls @PACKAGE_VE
0020: 52 53 49 4f 4e 40 20 5b 6a 6f 69 6e 20 5b 6c 69  RSION@ [join [li
0030: 73 74 20 5b 6c 69 73 74 20 70 61 63 6b 61 67 65  st [list package
0040: 20 72 65 71 75 69 72 65 20 54 63 6c 20 38 2e 35   require Tcl 8.5
0050: 5d 20 5b 6c 69 73 74 20 61 70 70 6c 79 20 7b 7b  ] [list apply {{
0060: 64 69 72 7d 20 7b 0a 09 69 66 20 7b 7b 40 54 43  dir} {..if {{@TC
0070: 4c 45 58 54 5f 42 55 49 4c 44 40 7d 20 65 71 20  LEXT_BUILD@} eq 
0080: 22 73 74 61 74 69 63 22 7d 20 7b 0a 09 09 6c 6f  "static"} {...lo
0090: 61 64 20 7b 7d 20 54 6c 73 0a 09 7d 20 65 6c 73  ad {} Tls..} els
00a0: 65 20 7b 0a 09 09 6c 6f 61 64 20 5b 66 69 6c 65  e {...load [file
00b0: 20 6a 6f 69 6e 20 24 64 69 72 20 74 63 6c 74 6c   join $dir tcltl
00c0: 73 2e 40 53 48 4f 42 4a 45 58 54 40 5d 20 54 6c  s.@SHOBJEXT@] Tl
00d0: 73 0a 09 7d 0a 0a 09 73 65 74 20 74 6c 73 54 63  s..}...set tlsTc
00e0: 6c 49 6e 69 74 53 63 72 69 70 74 20 5b 66 69 6c  lInitScript [fil
00f0: 65 20 6a 6f 69 6e 20 24 64 69 72 20 74 6c 73 2e  e join $dir tls.
0100: 74 63 6c 5d 0a 09 69 66 20 7b 5b 66 69 6c 65 20  tcl]..if {[file 
0110: 65 78 69 73 74 73 20 24 74 6c 73 54 63 6c 49 6e  exists $tlsTclIn
0120: 69 74 53 63 72 69 70 74 5d 7d 20 7b 0a 09 09 73  itScript]} {...s
0130: 6f 75 72 63 65 20 24 74 6c 73 54 63 6c 49 6e 69  ource $tlsTclIni
0140: 74 53 63 72 69 70 74 0a 09 7d 0a 7d 7d 20 24 64  tScript..}.}} $d
0150: 69 72 5d 5d 20 22 3b 20 22 5d 0a                 ir]] "; "].