Fossil

Differences From Artifact [960f3c67b5]:

• File tools/cvs2fossil/lib/c2f_pinitcsets.tcl — part of check-in [24c0b662de] at 2007-11-13 05:09:07 on branch trunk — Reworked the in-memory storage of changesets in pass 5 and supporting classes, and added loading of changesets from the persistent state for when the pass is skipped. (user: aku size: 10537)

To Artifact [bb434d64fd]:

• File tools/cvs2fossil/lib/c2f_pinitcsets.tcl — part of check-in [341d96be21] at 2007-11-16 03:52:18 on branch trunk — Bugfix. In pass 5, loading the changesets used the type codes instead of the type names. Modified the SQL selecting the data to return the proper names. (user: aku size: 10577)

102
103
104
105
106
107
108
109
110

111
112
113
114
115
116
117

	# executed.

	state reading changeset
	state reading csrevision
	state reading cstype

	foreach {id pid cstype srcid} [state run {
	    SELECT C.cid, C.pid, C.type, C.src
	    FROM   changeset C

	    ORDER BY C.cid
	}] {
	    set r [project::rev %AUTO% [repository projectof $pid] $cstype $srcid [state run {
		SELECT C.rid
		FROM   csrevision C
		WHERE  C.cid = $id
		ORDER  BY C.pos

|
|
>

102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118

	# executed.

	state reading changeset
	state reading csrevision
	state reading cstype

	foreach {id pid cstype srcid} [state run {
	    SELECT C.cid, C.pid, CS.name, C.src
	    FROM   changeset C, cstype CS
	    WHERE  C.type = CS.tid
	    ORDER BY C.cid
	}] {
	    set r [project::rev %AUTO% [repository projectof $pid] $cstype $srcid [state run {
		SELECT C.rid
		FROM   csrevision C
		WHERE  C.cid = $id
		ORDER  BY C.pos