Fossil

Check-in [a99d5798]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Added missing node attributes in the Replace command.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:a99d5798f66d3d6afee447d97fed18536760a8d1
User & Date: aku 2007-11-24 03:59:55
Context
2007-11-24
04:15
Added a number of assertions and must-not-happens with associated log output. Plus some small tweaks, and notes. check-in: eabaea87 user: aku tags: trunk
03:59
Added missing node attributes in the Replace command. check-in: a99d5798 user: aku tags: trunk
03:56
Updated passes 6 and 8 for to the changtes in the cycle breaker API (changed signature of save callback). check-in: 7ed2f29d user: aku tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to tools/cvs2fossil/lib/c2f_cyclebreaker.tcl.

152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
...
361
362
363
364
365
366
367


368
369
370
371
372
373
374

	set dg [struct::graph dg]

	foreach cset $changesets {
	    $dg node insert $cset
	    $dg node set    $cset timerange [$cset timerange]
	    $dg node set    $cset label     [ID $cset]
	    $dg node set    $cset __id__ [$cset id]
	}

	# 2. Find for all relevant changeset their revisions and their
	#    dependencies. Map the latter back to changesets and
	#    construct the corresponding arcs.

	if {$log} {
................................................................................
	set pre [$dg nodes -in $n]

        $dg node delete $n

	foreach cset $replacements {
	    $dg node insert $cset
	    $dg node set    $cset timerange [$cset timerange]


	}

	foreach cset $replacements {
	    foreach succ [$cset successors] {
		# The new changesets may have dependencies outside of
		# the chosen set. These are ignored
		if {![$dg node exists $succ]} continue







|







 







>
>







152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
...
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376

	set dg [struct::graph dg]

	foreach cset $changesets {
	    $dg node insert $cset
	    $dg node set    $cset timerange [$cset timerange]
	    $dg node set    $cset label     [ID $cset]
	    $dg node set    $cset __id__    [$cset id]
	}

	# 2. Find for all relevant changeset their revisions and their
	#    dependencies. Map the latter back to changesets and
	#    construct the corresponding arcs.

	if {$log} {
................................................................................
	set pre [$dg nodes -in $n]

        $dg node delete $n

	foreach cset $replacements {
	    $dg node insert $cset
	    $dg node set    $cset timerange [$cset timerange]
	    $dg node set    $cset label     [ID $cset]
	    $dg node set    $cset __id__    [$cset id]
	}

	foreach cset $replacements {
	    foreach succ [$cset successors] {
		# The new changesets may have dependencies outside of
		# the chosen set. These are ignored
		if {![$dg node exists $succ]} continue