Differences From:

File tools/cvs2fossil/lib/c2f_pcollsym.tcl part of check-in [6d4eb24738] - Skeleton for pass 3 added, collating the symbols. by aku on 2007-11-02 04:29:05. [view]

To:

File tools/cvs2fossil/lib/c2f_pcollsym.tcl part of check-in [f888f06fe3] - Continued work on pass 3, added code to determine the type of symbols based on the tag-, branch-, and commit-counts. Hook for handling data coming from the option processoris present (UserConfig), but only as a placeholder. by aku on 2007-11-02 06:06:24. [view]

@@ -17,17 +17,18 @@
 
 # # ## ### ##### ######## ############# #####################
 ## Requirements
 
-package require Tcl 8.4                             ; # Required runtime.
-package require snit                                ; # OO system.
-#package require fileutil::traverse                  ; # Directory traversal.
-#package require fileutil                            ; # File & path utilities.
-#package require vc::tools::trouble                  ; # Error reporting.
-package require vc::tools::log                      ; # User feedback.
-#package require vc::fossil::import::cvs::pass       ; # Pass management.
-#package require vc::fossil::import::cvs::repository ; # Repository management.
-package require vc::fossil::import::cvs::state      ; # State storage.
+package require Tcl 8.4                               ; # Required runtime.
+package require snit                                  ; # OO system.
+#package require fileutil::traverse                    ; # Directory traversal.
+#package require fileutil                              ; # File & path utilities.
+#package require vc::tools::trouble                    ; # Error reporting.
+package require vc::tools::log                        ; # User feedback.
+#package require vc::fossil::import::cvs::pass         ; # Pass management.
+package require vc::fossil::import::cvs::repository   ; # Repository management.
+package require vc::fossil::import::cvs::state        ; # State storage.
+package require vc::fossil::import::cvs::project::sym ; # Project level symbols
 
 # # ## ### ##### ######## ############# #####################
 ## Register the pass with the management
 
@@ -62,8 +63,15 @@
     typemethod run {} {
 	# Pass manager interface. Executed to perform the
 	# functionality of the pass.
 
+	state transaction {
+	    repository   determinesymboltypes
+
+	    project::sym printrulestatistics
+	    project::sym printtypestatistics
+	}
+
 	log write 1 collsym "Collation completed"
 	return
     }
 
@@ -90,10 +98,13 @@
 
 namespace eval ::vc::fossil::import::cvs::pass {
     namespace export collsym
     namespace eval collsym {
-	#namespace import ::vc::fossil::import::cvs::repository
+	namespace import ::vc::fossil::import::cvs::repository
 	namespace import ::vc::fossil::import::cvs::state
+	namespace eval project {
+	    namespace import ::vc::fossil::import::cvs::project::sym
+	}
 	#namespace import ::vc::tools::trouble
 	namespace import ::vc::tools::log
 	log register collsym
     }