Artifact 0a082ba7c7e0bbc5008c8054ab65e71a3d741ec2:

File tools/cvs2fossil/lib/pkgIndex.tcl part of check-in [e701313733] - Put the graph traversal core of the cycle breaker core into a separate class, for use in other parts of the system. TODO: Rewrite the cycle breaker core in terms of this class. by aku on 2007-12-05 07:50:17.

0000: 23 20 23 20 23 23 20 23 23 23 20 23 23 23 23 23  # # ## ### #####
0010: 20 23 23 23 23 23 23 23 23 20 23 23 23 23 23 23   ######## ######
0020: 23 23 23 23 23 23 23 20 23 23 23 23 23 23 23 23  ####### ########
0030: 23 23 23 23 23 23 23 23 23 23 23 23 23 0a 23 23  #############.##
0040: 20 50 61 63 6b 61 67 65 20 6d 61 6e 61 67 65 6d   Package managem
0050: 65 6e 74 2e 0a 23 23 20 49 6e 64 65 78 20 6f 66  ent..## Index of
0060: 20 74 68 65 20 6c 6f 63 61 6c 20 70 61 63 6b 61   the local packa
0070: 67 65 73 20 72 65 71 75 69 72 65 64 20 62 79 20  ges required by 
0080: 63 76 73 32 66 6f 73 73 69 6c 0a 23 20 23 20 23  cvs2fossil.# # #
0090: 23 20 23 23 23 20 23 23 23 23 23 20 23 23 23 23  # ### ##### ####
00a0: 23 23 23 23 20 23 23 23 23 23 23 23 23 23 23 23  #### ###########
00b0: 23 23 20 23 23 23 23 23 23 23 23 23 23 23 23 23  ## #############
00c0: 23 23 23 23 23 23 23 23 0a 69 66 20 7b 21 5b 70  ########.if {![p
00d0: 61 63 6b 61 67 65 20 76 73 61 74 69 73 66 69 65  ackage vsatisfie
00e0: 73 20 5b 70 61 63 6b 61 67 65 20 72 65 71 75 69  s [package requi
00f0: 72 65 20 54 63 6c 5d 20 38 2e 34 5d 7d 20 72 65  re Tcl] 8.4]} re
0100: 74 75 72 6e 0a 70 61 63 6b 61 67 65 20 69 66 6e  turn.package ifn
0110: 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c  eeded vc::fossil
0120: 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 20 20 20  ::import::cvs   
0130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0140: 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63   1.0 [list sourc
0150: 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69  e [file join $di
0160: 72 20 63 76 73 32 66 6f 73 73 69 6c 2e 74 63 6c  r cvs2fossil.tcl
0170: 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65  ]].package ifnee
0180: 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a  ded vc::fossil::
0190: 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 66 69 6c  import::cvs::fil
01a0: 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31  e              1
01b0: 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20  .0 [list source 
01c0: 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20  [file join $dir 
01d0: 63 32 66 5f 66 69 6c 65 2e 74 63 6c 5d 5d 0a 70  c2f_file.tcl]].p
01e0: 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20  ackage ifneeded 
01f0: 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f  vc::fossil::impo
0200: 72 74 3a 3a 63 76 73 3a 3a 66 69 6c 65 3a 3a 6c  rt::cvs::file::l
0210: 6f 64 6d 67 72 20 20 20 20 20 20 31 2e 30 20 5b  odmgr      1.0 [
0220: 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c  list source [fil
0230: 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f  e join $dir c2f_
0240: 66 6c 6f 64 6d 67 72 2e 74 63 6c 5d 5d 0a 70 61  flodmgr.tcl]].pa
0250: 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76  ckage ifneeded v
0260: 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72  c::fossil::impor
0270: 74 3a 3a 63 76 73 3a 3a 66 69 6c 65 3a 3a 72 65  t::cvs::file::re
0280: 76 20 20 20 20 20 20 20 20 20 31 2e 30 20 5b 6c  v         1.0 [l
0290: 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65  ist source [file
02a0: 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 66   join $dir c2f_f
02b0: 72 65 76 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67  rev.tcl]].packag
02c0: 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a 3a 66  e ifneeded vc::f
02d0: 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63  ossil::import::c
02e0: 76 73 3a 3a 66 69 6c 65 3a 3a 73 79 6d 20 20 20  vs::file::sym   
02f0: 20 20 20 20 20 20 31 2e 30 20 5b 6c 69 73 74 20        1.0 [list 
0300: 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69  source [file joi
0310: 6e 20 24 64 69 72 20 63 32 66 5f 66 73 79 6d 2e  n $dir c2f_fsym.
0320: 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66  tcl]].package if
0330: 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 69  needed vc::fossi
0340: 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a  l::import::cvs::
0350: 66 69 6c 65 3a 3a 74 72 75 6e 6b 20 20 20 20 20  file::trunk     
0360: 20 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72    1.0 [list sour
0370: 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64  ce [file join $d
0380: 69 72 20 63 32 66 5f 66 74 72 75 6e 6b 2e 74 63  ir c2f_ftrunk.tc
0390: 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65  l]].package ifne
03a0: 65 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a  eded vc::fossil:
03b0: 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 6f 70  :import::cvs::op
03c0: 74 69 6f 6e 20 20 20 20 20 20 20 20 20 20 20 20  tion            
03d0: 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65  1.0 [list source
03e0: 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72   [file join $dir
03f0: 20 63 32 66 5f 6f 70 74 69 6f 6e 2e 74 63 6c 5d   c2f_option.tcl]
0400: 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64  ].package ifneed
0410: 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69  ed vc::fossil::i
0420: 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 69 6e 74 65  mport::cvs::inte
0430: 67 72 69 74 79 20 20 20 20 20 20 20 20 20 31 2e  grity         1.
0440: 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b  0 [list source [
0450: 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63  file join $dir c
0460: 32 66 5f 69 6e 74 65 67 72 69 74 79 2e 74 63 6c  2f_integrity.tcl
0470: 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65  ]].package ifnee
0480: 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a  ded vc::fossil::
0490: 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 70 61 73  import::cvs::pas
04a0: 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31  s              1
04b0: 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20  .0 [list source 
04c0: 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20  [file join $dir 
04d0: 63 32 66 5f 70 61 73 73 2e 74 63 6c 5d 5d 0a 70  c2f_pass.tcl]].p
04e0: 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20  ackage ifneeded 
04f0: 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f  vc::fossil::impo
0500: 72 74 3a 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 63  rt::cvs::pass::c
0510: 6f 6c 6c 61 72 20 20 20 20 20 20 31 2e 30 20 5b  ollar      1.0 [
0520: 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c  list source [fil
0530: 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f  e join $dir c2f_
0540: 70 63 6f 6c 6c 61 72 2e 74 63 6c 5d 5d 0a 70 61  pcollar.tcl]].pa
0550: 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76  ckage ifneeded v
0560: 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72  c::fossil::impor
0570: 74 3a 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 63 6f  t::cvs::pass::co
0580: 6c 6c 72 65 76 20 20 20 20 20 31 2e 30 20 5b 6c  llrev     1.0 [l
0590: 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65  ist source [file
05a0: 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70   join $dir c2f_p
05b0: 63 6f 6c 6c 72 65 76 2e 74 63 6c 5d 5d 0a 70 61  collrev.tcl]].pa
05c0: 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76  ckage ifneeded v
05d0: 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72  c::fossil::impor
05e0: 74 3a 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 63 6f  t::cvs::pass::co
05f0: 6c 6c 73 79 6d 20 20 20 20 20 31 2e 30 20 5b 6c  llsym     1.0 [l
0600: 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65  ist source [file
0610: 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70   join $dir c2f_p
0620: 63 6f 6c 6c 73 79 6d 2e 74 63 6c 5d 5d 0a 70 61  collsym.tcl]].pa
0630: 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76  ckage ifneeded v
0640: 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72  c::fossil::impor
0650: 74 3a 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 66 69  t::cvs::pass::fi
0660: 6c 74 65 72 73 79 6d 20 20 20 31 2e 30 20 5b 6c  ltersym   1.0 [l
0670: 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65  ist source [file
0680: 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70   join $dir c2f_p
0690: 66 69 6c 74 65 72 73 79 6d 2e 74 63 6c 5d 5d 0a  filtersym.tcl]].
06a0: 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64  package ifneeded
06b0: 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70   vc::fossil::imp
06c0: 6f 72 74 3a 3a 63 76 73 3a 3a 70 61 73 73 3a 3a  ort::cvs::pass::
06d0: 69 6e 69 74 63 73 65 74 73 20 20 20 31 2e 30 20  initcsets   1.0 
06e0: 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69  [list source [fi
06f0: 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66  le join $dir c2f
0700: 5f 70 69 6e 69 74 63 73 65 74 73 2e 74 63 6c 5d  _pinitcsets.tcl]
0710: 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64  ].package ifneed
0720: 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69  ed vc::fossil::i
0730: 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 70 61 73 73  mport::cvs::pass
0740: 3a 3a 63 73 65 74 64 65 70 73 20 20 20 20 31 2e  ::csetdeps    1.
0750: 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b  0 [list source [
0760: 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63  file join $dir c
0770: 32 66 5f 70 63 73 65 74 64 65 70 73 2e 74 63 6c  2f_pcsetdeps.tcl
0780: 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65  ]].package ifnee
0790: 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a  ded vc::fossil::
07a0: 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 70 61 73  import::cvs::pas
07b0: 73 3a 3a 62 72 65 61 6b 72 63 79 63 6c 65 20 31  s::breakrcycle 1
07c0: 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20  .0 [list source 
07d0: 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20  [file join $dir 
07e0: 63 32 66 5f 70 62 72 65 61 6b 72 63 79 63 6c 65  c2f_pbreakrcycle
07f0: 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69  .tcl]].package i
0800: 66 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73  fneeded vc::foss
0810: 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a  il::import::cvs:
0820: 3a 70 61 73 73 3a 3a 72 74 6f 70 73 6f 72 74 20  :pass::rtopsort 
0830: 20 20 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75     1.0 [list sou
0840: 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24  rce [file join $
0850: 64 69 72 20 63 32 66 5f 70 72 74 6f 70 73 6f 72  dir c2f_prtopsor
0860: 74 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20  t.tcl]].package 
0870: 69 66 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f 73  ifneeded vc::fos
0880: 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73  sil::import::cvs
0890: 3a 3a 70 61 73 73 3a 3a 62 72 65 61 6b 73 63 79  ::pass::breakscy
08a0: 63 6c 65 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f  cle 1.0 [list so
08b0: 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20  urce [file join 
08c0: 24 64 69 72 20 63 32 66 5f 70 62 72 65 61 6b 73  $dir c2f_pbreaks
08d0: 63 79 63 6c 65 2e 74 63 6c 5d 5d 0a 70 61 63 6b  cycle.tcl]].pack
08e0: 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a  age ifneeded vc:
08f0: 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a  :fossil::import:
0900: 3a 63 76 73 3a 3a 70 61 73 73 3a 3a 62 72 65 61  :cvs::pass::brea
0910: 6b 61 63 79 63 6c 65 20 31 2e 30 20 5b 6c 69 73  kacycle 1.0 [lis
0920: 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a  t source [file j
0930: 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70 62 72  oin $dir c2f_pbr
0940: 65 61 6b 61 63 79 63 6c 65 2e 74 63 6c 5d 5d 0a  eakacycle.tcl]].
0950: 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64  package ifneeded
0960: 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70   vc::fossil::imp
0970: 6f 72 74 3a 3a 63 76 73 3a 3a 70 61 73 73 3a 3a  ort::cvs::pass::
0980: 61 74 6f 70 73 6f 72 74 20 20 20 20 31 2e 30 20  atopsort    1.0 
0990: 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69  [list source [fi
09a0: 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66  le join $dir c2f
09b0: 5f 70 61 74 6f 70 73 6f 72 74 2e 74 63 6c 5d 5d  _patopsort.tcl]]
09c0: 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65  .package ifneede
09d0: 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d  d vc::fossil::im
09e0: 70 6f 72 74 3a 3a 63 76 73 3a 3a 67 74 63 6f 72  port::cvs::gtcor
09f0: 65 20 20 20 20 20 20 20 20 20 20 20 20 31 2e 30  e            1.0
0a00: 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66   [list source [f
0a10: 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32  ile join $dir c2
0a20: 66 5f 67 74 63 6f 72 65 2e 74 63 6c 5d 5d 0a 70  f_gtcore.tcl]].p
0a30: 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20  ackage ifneeded 
0a40: 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f  vc::fossil::impo
0a50: 72 74 3a 3a 63 76 73 3a 3a 63 79 63 6c 65 62 72  rt::cvs::cyclebr
0a60: 65 61 6b 65 72 20 20 20 20 20 20 31 2e 30 20 5b  eaker      1.0 [
0a70: 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c  list source [fil
0a80: 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f  e join $dir c2f_
0a90: 63 79 63 6c 65 62 72 65 61 6b 65 72 2e 74 63 6c  cyclebreaker.tcl
0aa0: 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65  ]].package ifnee
0ab0: 64 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a  ded vc::fossil::
0ac0: 69 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 70 72 6f  import::cvs::pro
0ad0: 6a 65 63 74 20 20 20 20 20 20 20 20 20 20 20 31  ject           1
0ae0: 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20  .0 [list source 
0af0: 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20  [file join $dir 
0b00: 63 32 66 5f 70 72 6f 6a 65 63 74 2e 74 63 6c 5d  c2f_project.tcl]
0b10: 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64  ].package ifneed
0b20: 65 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69  ed vc::fossil::i
0b30: 6d 70 6f 72 74 3a 3a 63 76 73 3a 3a 70 72 6f 6a  mport::cvs::proj
0b40: 65 63 74 3a 3a 6c 6f 64 6d 67 72 20 20 20 31 2e  ect::lodmgr   1.
0b50: 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b  0 [list source [
0b60: 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63  file join $dir c
0b70: 32 66 5f 70 6c 6f 64 6d 67 72 2e 74 63 6c 5d 5d  2f_plodmgr.tcl]]
0b80: 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65  .package ifneede
0b90: 64 20 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d  d vc::fossil::im
0ba0: 70 6f 72 74 3a 3a 63 76 73 3a 3a 70 72 6f 6a 65  port::cvs::proje
0bb0: 63 74 3a 3a 72 65 76 20 20 20 20 20 20 31 2e 30  ct::rev      1.0
0bc0: 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66   [list source [f
0bd0: 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 63 32  ile join $dir c2
0be0: 66 5f 70 72 65 76 2e 74 63 6c 5d 5d 0a 70 61 63  f_prev.tcl]].pac
0bf0: 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 63  kage ifneeded vc
0c00: 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74  ::fossil::import
0c10: 3a 3a 63 76 73 3a 3a 70 72 6f 6a 65 63 74 3a 3a  ::cvs::project::
0c20: 72 65 76 6c 69 6e 6b 20 20 31 2e 30 20 5b 6c 69  revlink  1.0 [li
0c30: 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20  st source [file 
0c40: 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70 72  join $dir c2f_pr
0c50: 65 76 6c 69 6e 6b 2e 74 63 6c 5d 5d 0a 70 61 63  evlink.tcl]].pac
0c60: 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20 76 63  kage ifneeded vc
0c70: 3a 3a 66 6f 73 73 69 6c 3a 3a 69 6d 70 6f 72 74  ::fossil::import
0c80: 3a 3a 63 76 73 3a 3a 70 72 6f 6a 65 63 74 3a 3a  ::cvs::project::
0c90: 73 79 6d 20 20 20 20 20 20 31 2e 30 20 5b 6c 69  sym      1.0 [li
0ca0: 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c 65 20  st source [file 
0cb0: 6a 6f 69 6e 20 24 64 69 72 20 63 32 66 5f 70 73  join $dir c2f_ps
0cc0: 79 6d 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65  ym.tcl]].package
0cd0: 20 69 66 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f   ifneeded vc::fo
0ce0: 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76  ssil::import::cv
0cf0: 73 3a 3a 70 72 6f 6a 65 63 74 3a 3a 74 72 75 6e  s::project::trun
0d00: 6b 20 20 20 20 31 2e 30 20 5b 6c 69 73 74 20 73  k    1.0 [list s
0d10: 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e  ource [file join
0d20: 20 24 64 69 72 20 63 32 66 5f 70 74 72 75 6e 6b   $dir c2f_ptrunk
0d30: 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69  .tcl]].package i
0d40: 66 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f 73 73  fneeded vc::foss
0d50: 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76 73 3a  il::import::cvs:
0d60: 3a 72 65 70 6f 73 69 74 6f 72 79 20 20 20 20 20  :repository     
0d70: 20 20 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75     1.0 [list sou
0d80: 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24  rce [file join $
0d90: 64 69 72 20 63 32 66 5f 72 65 70 6f 73 69 74 6f  dir c2f_reposito
0da0: 72 79 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65  ry.tcl]].package
0db0: 20 69 66 6e 65 65 64 65 64 20 76 63 3a 3a 66 6f   ifneeded vc::fo
0dc0: 73 73 69 6c 3a 3a 69 6d 70 6f 72 74 3a 3a 63 76  ssil::import::cv
0dd0: 73 3a 3a 73 74 61 74 65 20 20 20 20 20 20 20 20  s::state        
0de0: 20 20 20 20 20 31 2e 30 20 5b 6c 69 73 74 20 73       1.0 [list s
0df0: 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e  ource [file join
0e00: 20 24 64 69 72 20 63 32 66 5f 73 74 61 74 65 2e   $dir c2f_state.
0e10: 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66  tcl]].package if
0e20: 6e 65 65 64 65 64 20 76 63 3a 3a 72 63 73 3a 3a  needed vc::rcs::
0e30: 70 61 72 73 65 72 20 20 20 20 20 20 20 20 20 20  parser          
0e40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0e50: 20 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72    1.0 [list sour
0e60: 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64  ce [file join $d
0e70: 69 72 20 72 63 73 70 61 72 73 65 72 2e 74 63 6c  ir rcsparser.tcl
0e80: 5d 5d 0a 70 61 63 6b 61 67 65 20 69 66 6e 65 65  ]].package ifnee
0e90: 64 65 64 20 76 63 3a 3a 74 6f 6f 6c 73 3a 3a 64  ded vc::tools::d
0ea0: 6f 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ot              
0eb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31                 1
0ec0: 2e 30 20 5b 6c 69 73 74 20 73 6f 75 72 63 65 20  .0 [list source 
0ed0: 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20  [file join $dir 
0ee0: 64 6f 74 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67  dot.tcl]].packag
0ef0: 65 20 69 66 6e 65 65 64 65 64 20 76 63 3a 3a 74  e ifneeded vc::t
0f00: 6f 6f 6c 73 3a 3a 69 64 20 20 20 20 20 20 20 20  ools::id        
0f10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0f20: 20 20 20 20 20 20 31 2e 30 20 5b 6c 69 73 74 20        1.0 [list 
0f30: 73 6f 75 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69  source [file joi
0f40: 6e 20 24 64 69 72 20 69 64 2e 74 63 6c 5d 5d 0a  n $dir id.tcl]].
0f50: 70 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64  package ifneeded
0f60: 20 76 63 3a 3a 74 6f 6f 6c 73 3a 3a 6c 6f 67 20   vc::tools::log 
0f70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0f80: 20 20 20 20 20 20 20 20 20 20 20 20 31 2e 30 20              1.0 
0f90: 5b 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69  [list source [fi
0fa0: 6c 65 20 6a 6f 69 6e 20 24 64 69 72 20 6c 6f 67  le join $dir log
0fb0: 2e 74 63 6c 5d 5d 0a 70 61 63 6b 61 67 65 20 69  .tcl]].package i
0fc0: 66 6e 65 65 64 65 64 20 76 63 3a 3a 74 6f 6f 6c  fneeded vc::tool
0fd0: 73 3a 3a 6d 69 73 63 20 20 20 20 20 20 20 20 20  s::misc         
0fe0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0ff0: 20 20 20 31 2e 30 20 5b 6c 69 73 74 20 73 6f 75     1.0 [list sou
1000: 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24  rce [file join $
1010: 64 69 72 20 6d 69 73 63 2e 74 63 6c 5d 5d 0a 70  dir misc.tcl]].p
1020: 61 63 6b 61 67 65 20 69 66 6e 65 65 64 65 64 20  ackage ifneeded 
1030: 76 63 3a 3a 74 6f 6f 6c 73 3a 3a 74 72 6f 75 62  vc::tools::troub
1040: 6c 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20  le              
1050: 20 20 20 20 20 20 20 20 20 20 20 31 2e 30 20 5b             1.0 [
1060: 6c 69 73 74 20 73 6f 75 72 63 65 20 5b 66 69 6c  list source [fil
1070: 65 20 6a 6f 69 6e 20 24 64 69 72 20 74 72 6f 75  e join $dir trou
1080: 62 6c 65 2e 74 63 6c 5d 5d 0a                    ble.tcl]].