Differences From:

File tools/cvs2fossil/lib/c2f_pbreakrcycle.tcl part of check-in [b679ca3356] - Code cleanup. Removed trailing whitespace across the board. by aku on 2007-11-25 07:54:09. [view]

To:

File tools/cvs2fossil/lib/c2f_pbreakrcycle.tcl part of check-in [bf83201c7f] - Outline for more integrity checks, focusing on the changesets. by aku on 2007-11-27 02:37:51. [view]

@@ -24,8 +24,9 @@
 package require vc::tools::log                            ; # User feedback.
 package require vc::fossil::import::cvs::repository       ; # Repository management.
 package require vc::fossil::import::cvs::cyclebreaker     ; # Breaking dependency cycles.
 package require vc::fossil::import::cvs::state            ; # State storage.
+package require vc::fossil::import::cvs::integrity        ; # State integrity checks.
 package require vc::fossil::import::cvs::project::rev     ; # Project level changesets
 
 # # ## ### ##### ######## ############# #####################
 ## Register the pass with the management
@@ -66,11 +67,12 @@
 	cyclebreaker breakcmd {::vc::fossil::import::cvs::cyclebreaker break}
 
 	state transaction {
 	    cyclebreaker run break-rev [myproc Changesets]
-	}
 
-	repository printcsetstatistics
+	    repository printcsetstatistics
+	    integrity changesets
+	}
 	return
     }
 
     typemethod discard {} {
@@ -104,8 +106,9 @@
     namespace eval breakrcycle {
 	namespace import ::vc::fossil::import::cvs::cyclebreaker
 	namespace import ::vc::fossil::import::cvs::repository
 	namespace import ::vc::fossil::import::cvs::state
+	namespace import ::vc::fossil::import::cvs::integrity
 	namespace eval project {
 	    namespace import ::vc::fossil::import::cvs::project::rev
 	}
 	namespace import ::vc::tools::log