Check-in [2e3815c3b4]
Not logged in
Overview

SHA1 Hash:2e3815c3b4b6f7e84f50abf876c95106c68769ce
Date: 2007-10-06 21:01:15
User: aku
Comment:Added skeleton and dump methods to make file objects proper sinks for the rcs parser.
Timelines: ancestors | descendants | both | trunk
Other Links: files | ZIP archive | manifest

Tags And Properties
Changes
[hide diffs]

Modified tools/cvs2fossil/lib/c2f_file.tcl from [d278cae8eb] to [29f9eb7047].

@@ -31,10 +31,35 @@
 	set myproject $project
 	return
     }
 
     method path {} { return $mypath }
+
+    # # ## ### ##### ######## #############
+    ## Methods required for the class to be a sink of the rcs parser
+
+    method begin {} {}
+    method sethead {h} {}
+    method setprincipalbranch {b} {}
+    method setsymbols {dict} {}
+    method setcomment {c} {}
+    method admindone {} {}
+    method def {rev date author state next branches} {}
+    method setdesc {d} {}
+    method extend {rev commitmsg deltarange} {}
+    method done {} {}
+
+    #method begin {} {puts begin}
+    #method sethead {h} {puts head=$h}
+    #method setprincipalbranch {b} {puts pb=$b}
+    #method setsymbols {dict} {puts symbols=$dict}
+    #method setcomment {c} {puts comment=$c}
+    #method admindone {} {puts admindone}
+    #method def {rev date author state next branches} {puts "def $rev $date $author $state $next $branches"}
+    #method setdesc {d} {puts desc=$d}
+    #method extend {rev commitmsg deltarange} {puts "extend $commitmsg $deltarange"}
+    #method done {} {puts done}
 
     # # ## ### ##### ######## #############
     ## State
 
     variable mypath    {} ; # Path of rcs archive