Fossil SCM
Skeleton for pass 3 added, collating the symbols.
Commit
6d4eb24738e9908a7cdca5742a43e4de03a06e06
Parent
c3d5104084f1efe…
3 files changed
+24
+1
+1
| --- a/tools/cvs2fossil/lib/c2f_pcollsym.tcl | ||
| +++ b/tools/cvs2fossil/lib/c2f_pcollsym.tcl | ||
| @@ -0,0 +1,24 @@ | ||
| 1 | +## -*- tcl -* ######## ########TODO## -*- tcl -* ######## ################ ##########ted`)) -- Restrict to symeleted by this pass, not only marked. It is the next | |
| 2 | +## pass however, 'FilterSym', which performs the full deletion. | |
| 3 | + | |
| 4 | +# # ## ### ##### ######## ############# ##################### | |
| 5 | +## Requirements | |
| 6 | + | |
| 7 | +package require Tcl 8.4 ; # Required runtime. | |
| 8 | +package require snit ; # OO system. | |
| 9 | +package require vc::tools::trouble ; # Error reporting. | |
| 10 | +package require vc::tools::log ; # User feedback. | |
| 11 | +packag__not__ | |
| 12 | +##y ; # Repository manay ; # Repository manageme pass, | |
| 13 | +##:state ; # State storage. | |
| 14 | +actua ; # State storage. | |
| 15 | +package require vc::fossil::import::cvs::project::sym ; # Project level symbols | |
| 16 | + | |
| 17 | +# # ## ### ##### ######## ################################# | |
| 18 | +## Register t.## -*- tcl -* ######## #######require T### ############; # Directory traversal. | |
| 19 | +#require Tcl 8.4 fileutil##### ############# #t only ; # File & path utilities. | |
| 20 | +#require Tcl 8.4 tcl* ######## ########TODO## -*- tcl -* ######## ################ ##########ted`)) ####### ##########ted`)) -- Restrict to symeleted by this pass, not#requi Tcl 8.4ass ; # Passforms the full deletion. | |
| 21 | + | |
| 22 | +#forms the full de## ########TODO## -*-### ######## #### snit repository Tcl 8.4 ; # Required runtime. | |
| 23 | +package require sni; # State storagetate storage. | |
| 24 | +package require vc::fossil::import::cvs::project::sym ; ymeleted by this |
| --- a/tools/cvs2fossil/lib/c2f_pcollsym.tcl | |
| +++ b/tools/cvs2fossil/lib/c2f_pcollsym.tcl | |
| @@ -0,0 +1,24 @@ | |
| --- a/tools/cvs2fossil/lib/c2f_pcollsym.tcl | |
| +++ b/tools/cvs2fossil/lib/c2f_pcollsym.tcl | |
| @@ -0,0 +1,24 @@ | |
| 1 | ## -*- tcl -* ######## ########TODO## -*- tcl -* ######## ################ ##########ted`)) -- Restrict to symeleted by this pass, not only marked. It is the next |
| 2 | ## pass however, 'FilterSym', which performs the full deletion. |
| 3 | |
| 4 | # # ## ### ##### ######## ############# ##################### |
| 5 | ## Requirements |
| 6 | |
| 7 | package require Tcl 8.4 ; # Required runtime. |
| 8 | package require snit ; # OO system. |
| 9 | package require vc::tools::trouble ; # Error reporting. |
| 10 | package require vc::tools::log ; # User feedback. |
| 11 | packag__not__ |
| 12 | ##y ; # Repository manay ; # Repository manageme pass, |
| 13 | ##:state ; # State storage. |
| 14 | actua ; # State storage. |
| 15 | package require vc::fossil::import::cvs::project::sym ; # Project level symbols |
| 16 | |
| 17 | # # ## ### ##### ######## ################################# |
| 18 | ## Register t.## -*- tcl -* ######## #######require T### ############; # Directory traversal. |
| 19 | #require Tcl 8.4 fileutil##### ############# #t only ; # File & path utilities. |
| 20 | #require Tcl 8.4 tcl* ######## ########TODO## -*- tcl -* ######## ################ ##########ted`)) ####### ##########ted`)) -- Restrict to symeleted by this pass, not#requi Tcl 8.4ass ; # Passforms the full deletion. |
| 21 | |
| 22 | #forms the full de## ########TODO## -*-### ######## #### snit repository Tcl 8.4 ; # Required runtime. |
| 23 | package require sni; # State storagetate storage. |
| 24 | package require vc::fossil::import::cvs::project::sym ; ymeleted by this |
| --- tools/cvs2fossil/lib/cvs2fossil.tcl | ||
| +++ tools/cvs2fossil/lib/cvs2fossil.tcl | ||
| @@ -24,10 +24,11 @@ | ||
| 24 | 24 | ## important. It is the same order they will register, and then be run |
| 25 | 25 | ## in. |
| 26 | 26 | |
| 27 | 27 | package require vc::fossil::import::cvs::pass::collar ; # Coll'ect Ar'chives. |
| 28 | 28 | package require vc::fossil::import::cvs::pass::collrev ; # Coll'ect Rev'isions. |
| 29 | +package require vc::fossil::import::cvs::pass::collsym ; # Coll'ate Sym'bols | |
| 29 | 30 | |
| 30 | 31 | # # ## ### ##### ######## ############# ##################### |
| 31 | 32 | ## Support for passes etc. |
| 32 | 33 | |
| 33 | 34 | package require vc::fossil::import::cvs::option ; # Cmd line parsing & database |
| 34 | 35 |
| --- tools/cvs2fossil/lib/cvs2fossil.tcl | |
| +++ tools/cvs2fossil/lib/cvs2fossil.tcl | |
| @@ -24,10 +24,11 @@ | |
| 24 | ## important. It is the same order they will register, and then be run |
| 25 | ## in. |
| 26 | |
| 27 | package require vc::fossil::import::cvs::pass::collar ; # Coll'ect Ar'chives. |
| 28 | package require vc::fossil::import::cvs::pass::collrev ; # Coll'ect Rev'isions. |
| 29 | |
| 30 | # # ## ### ##### ######## ############# ##################### |
| 31 | ## Support for passes etc. |
| 32 | |
| 33 | package require vc::fossil::import::cvs::option ; # Cmd line parsing & database |
| 34 |
| --- tools/cvs2fossil/lib/cvs2fossil.tcl | |
| +++ tools/cvs2fossil/lib/cvs2fossil.tcl | |
| @@ -24,10 +24,11 @@ | |
| 24 | ## important. It is the same order they will register, and then be run |
| 25 | ## in. |
| 26 | |
| 27 | package require vc::fossil::import::cvs::pass::collar ; # Coll'ect Ar'chives. |
| 28 | package require vc::fossil::import::cvs::pass::collrev ; # Coll'ect Rev'isions. |
| 29 | package require vc::fossil::import::cvs::pass::collsym ; # Coll'ate Sym'bols |
| 30 | |
| 31 | # # ## ### ##### ######## ############# ##################### |
| 32 | ## Support for passes etc. |
| 33 | |
| 34 | package require vc::fossil::import::cvs::option ; # Cmd line parsing & database |
| 35 |
| --- tools/cvs2fossil/lib/pkgIndex.tcl | ||
| +++ tools/cvs2fossil/lib/pkgIndex.tcl | ||
| @@ -11,10 +11,11 @@ | ||
| 11 | 11 | package ifneeded vc::fossil::import::cvs::file::trunk 1.0 [list source [file join $dir c2f_ftrunk.tcl]] |
| 12 | 12 | package ifneeded vc::fossil::import::cvs::option 1.0 [list source [file join $dir c2f_option.tcl]] |
| 13 | 13 | package ifneeded vc::fossil::import::cvs::pass 1.0 [list source [file join $dir c2f_pass.tcl]] |
| 14 | 14 | package ifneeded vc::fossil::import::cvs::pass::collar 1.0 [list source [file join $dir c2f_pcollar.tcl]] |
| 15 | 15 | package ifneeded vc::fossil::import::cvs::pass::collrev 1.0 [list source [file join $dir c2f_pcollrev.tcl]] |
| 16 | +package ifneeded vc::fossil::import::cvs::pass::collsym 1.0 [list source [file join $dir c2f_pcollsym.tcl]] | |
| 16 | 17 | package ifneeded vc::fossil::import::cvs::project 1.0 [list source [file join $dir c2f_project.tcl]] |
| 17 | 18 | package ifneeded vc::fossil::import::cvs::project::lodmgr 1.0 [list source [file join $dir c2f_plodmgr.tcl]] |
| 18 | 19 | package ifneeded vc::fossil::import::cvs::project::rev 1.0 [list source [file join $dir c2f_prev.tcl]] |
| 19 | 20 | package ifneeded vc::fossil::import::cvs::project::sym 1.0 [list source [file join $dir c2f_psym.tcl]] |
| 20 | 21 | package ifneeded vc::fossil::import::cvs::project::trunk 1.0 [list source [file join $dir c2f_ptrunk.tcl]] |
| 21 | 22 |
| --- tools/cvs2fossil/lib/pkgIndex.tcl | |
| +++ tools/cvs2fossil/lib/pkgIndex.tcl | |
| @@ -11,10 +11,11 @@ | |
| 11 | package ifneeded vc::fossil::import::cvs::file::trunk 1.0 [list source [file join $dir c2f_ftrunk.tcl]] |
| 12 | package ifneeded vc::fossil::import::cvs::option 1.0 [list source [file join $dir c2f_option.tcl]] |
| 13 | package ifneeded vc::fossil::import::cvs::pass 1.0 [list source [file join $dir c2f_pass.tcl]] |
| 14 | package ifneeded vc::fossil::import::cvs::pass::collar 1.0 [list source [file join $dir c2f_pcollar.tcl]] |
| 15 | package ifneeded vc::fossil::import::cvs::pass::collrev 1.0 [list source [file join $dir c2f_pcollrev.tcl]] |
| 16 | package ifneeded vc::fossil::import::cvs::project 1.0 [list source [file join $dir c2f_project.tcl]] |
| 17 | package ifneeded vc::fossil::import::cvs::project::lodmgr 1.0 [list source [file join $dir c2f_plodmgr.tcl]] |
| 18 | package ifneeded vc::fossil::import::cvs::project::rev 1.0 [list source [file join $dir c2f_prev.tcl]] |
| 19 | package ifneeded vc::fossil::import::cvs::project::sym 1.0 [list source [file join $dir c2f_psym.tcl]] |
| 20 | package ifneeded vc::fossil::import::cvs::project::trunk 1.0 [list source [file join $dir c2f_ptrunk.tcl]] |
| 21 |
| --- tools/cvs2fossil/lib/pkgIndex.tcl | |
| +++ tools/cvs2fossil/lib/pkgIndex.tcl | |
| @@ -11,10 +11,11 @@ | |
| 11 | package ifneeded vc::fossil::import::cvs::file::trunk 1.0 [list source [file join $dir c2f_ftrunk.tcl]] |
| 12 | package ifneeded vc::fossil::import::cvs::option 1.0 [list source [file join $dir c2f_option.tcl]] |
| 13 | package ifneeded vc::fossil::import::cvs::pass 1.0 [list source [file join $dir c2f_pass.tcl]] |
| 14 | package ifneeded vc::fossil::import::cvs::pass::collar 1.0 [list source [file join $dir c2f_pcollar.tcl]] |
| 15 | package ifneeded vc::fossil::import::cvs::pass::collrev 1.0 [list source [file join $dir c2f_pcollrev.tcl]] |
| 16 | package ifneeded vc::fossil::import::cvs::pass::collsym 1.0 [list source [file join $dir c2f_pcollsym.tcl]] |
| 17 | package ifneeded vc::fossil::import::cvs::project 1.0 [list source [file join $dir c2f_project.tcl]] |
| 18 | package ifneeded vc::fossil::import::cvs::project::lodmgr 1.0 [list source [file join $dir c2f_plodmgr.tcl]] |
| 19 | package ifneeded vc::fossil::import::cvs::project::rev 1.0 [list source [file join $dir c2f_prev.tcl]] |
| 20 | package ifneeded vc::fossil::import::cvs::project::sym 1.0 [list source [file join $dir c2f_psym.tcl]] |
| 21 | package ifneeded vc::fossil::import::cvs::project::trunk 1.0 [list source [file join $dir c2f_ptrunk.tcl]] |
| 22 |