Differences From:

File tools/cvs2fossil/lib/c2f_state.tcl part of check-in [10f9d51bb2] - Added documentation to state definition, and debugging output to the state system itself. by aku on 2007-10-06 03:55:06. [view]

To:

File tools/cvs2fossil/lib/c2f_state.tcl part of check-in [ae19c0fcb4] - Extended pass manager to handle the skipped and defered passes coming before and after the actually executed passes. Extended passes I and II to have the required methods. Implemented loading (for skipped passes) as skeletons, implemented discarding (for defered passes) completely. Extended state manager with ability to discard state. by aku on 2007-10-13 23:29:17. [view]

@@ -127,8 +127,20 @@
 	if {$found} return
 
 	trouble internal "The required table \"$name\" is not defined."
 	# Not reached
+	return
+    }
+
+    typemethod discard {name} {
+	# Method for a user to remove outdated information from the
+	# persistent state, table by table.
+
+	log write 0 state "discard $name" ; # TODO move to level 5 or so
+
+	$mystate transaction {
+	    catch { $mystate eval "DROP TABLE $name" }
+	}
 	return
     }
 
     typemethod run {args} {