Hex Artifact Content

Artifact 7808338db3a89fcacf142905ffe9afa2091b837b:


0000: 23 20 54 63 6c 20 70 61 63 6b 61 67 65 20 69 6e  # Tcl package in
0010: 64 65 78 20 66 69 6c 65 2c 20 76 65 72 73 69 6f  dex file, versio
0020: 6e 20 31 2e 31 0a 0a 69 66 20 7b 21 5b 70 61 63  n 1.1..if {![pac
0030: 6b 61 67 65 20 76 73 61 74 69 73 66 69 65 73 20  kage vsatisfies 
0040: 5b 70 61 63 6b 61 67 65 20 70 72 6f 76 69 64 65  [package provide
0050: 20 54 63 6c 5d 20 38 2e 34 5d 7d 20 7b 72 65 74   Tcl] 8.4]} {ret
0060: 75 72 6e 7d 0a 70 61 63 6b 61 67 65 20 69 66 6e  urn}.package ifn
0070: 65 65 64 65 64 20 6a 73 6f 6e 20 31 2e 33 2e 33  eeded json 1.3.3
0080: 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66   [list source [f
0090: 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 6a 73  ile join $dir js
00a0: 6f 6e 2e 74 63 6c 5d 5d 0a 0a 69 66 20 7b 21 5b  on.tcl]]..if {![
00b0: 70 61 63 6b 61 67 65 20 76 73 61 74 69 73 66 69  package vsatisfi
00c0: 65 73 20 5b 70 61 63 6b 61 67 65 20 70 72 6f 76  es [package prov
00d0: 69 64 65 20 54 63 6c 5d 20 38 2e 35 5d 7d 20 7b  ide Tcl] 8.5]} {
00e0: 72 65 74 75 72 6e 7d 0a 70 61 63 6b 61 67 65 20  return}.package 
00f0: 69 66 6e 65 65 64 65 64 20 6a 73 6f 6e 3a 3a 77  ifneeded json::w
0100: 72 69 74 65 20 31 2e 30 2e 33 20 5b 6c 69 73 74  rite 1.0.3 [list
0110: 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f   source [file jo
0120: 69 6e 20 24 64 69 72 20 6a 73 6f 6e 5f 77 72 69  in $dir json_wri
0130: 74 65 2e 74 63 6c 5d 5d 0a                       te.tcl]].