Differences From:

File tools/cvs2fossil/lib/c2f_pbreakacycle.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_pbreakacycle.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]

@@ -28,8 +28,9 @@
 package require vc::tools::trouble                        ; # Error reporting.
 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
@@ -76,11 +77,12 @@
 
 	state transaction {
 	    LoadCommitOrder
 	    cyclebreaker run break-all [myproc Changesets]
-	}
-
-	repository printcsetstatistics
+
+	    repository printcsetstatistics
+	    integrity changesets
+	}
 	return
     }
 
     typemethod discard {} {
@@ -512,8 +514,9 @@
     namespace eval breakacycle {
 	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::misc::*