Not logged in
Diff

Differences From Artifact [71d77fda76]:

  • File tools/cvs2fossil/lib/c2f_pcollrev.tcl — part of check-in [8a93ffa9c1] at 2007-10-06 18:43:01 on branch trunk — Fleshed out pass II, added skeleton of rcs archive class, started integration of rcs parser. (user: aku size: 8363)

To Artifact [daf2ded7dd]:

  • File tools/cvs2fossil/lib/c2f_pcollrev.tcl — part of check-in [ec053168a8] at 2007-10-06 20:58:24 on branch trunk — Nicer parser integration into pass II, and sort files for easier filesystem traversal during parsing. (user: aku size: 8327)

188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
	foreach project [repository projects] {
	    set base [file join $rbase [$project base]]
	    log write 1 collrev "Processing $base"

	    foreach file [$project files] {
		set path [$file path]
		log write 2 collrev "Parsing $path"
		rcs::process [file join $base $path] $file
	    }
	}

	repository printrevstatistics
	repository persistrev

	log write 1 collrev "Scan completed"







|







188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
	foreach project [repository projects] {
	    set base [file join $rbase [$project base]]
	    log write 1 collrev "Processing $base"

	    foreach file [$project files] {
		set path [$file path]
		log write 2 collrev "Parsing $path"
		parser process [file join $base $path] $file
	    }
	}

	repository printrevstatistics
	repository persistrev

	log write 1 collrev "Scan completed"
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237

    # # ## ### ##### ######## #############
}

namespace eval ::vc::fossil::import::cvs::pass {
    namespace export collrev
    namespace eval collrev {
	namespace eval rcs {
	    namespace import ::vc::rcs::parser::process
	}
	namespace import ::vc::fossil::import::cvs::repository
	namespace import ::vc::fossil::import::cvs::state
	namespace import ::vc::tools::trouble
	namespace import ::vc::tools::log
	log register collrev
    }
}

# # ## ### ##### ######## ############# #####################
## Ready

package provide vc::fossil::import::cvs::pass::collrev 1.0
return







<
|
<













215
216
217
218
219
220
221

222

223
224
225
226
227
228
229
230
231
232
233
234
235

    # # ## ### ##### ######## #############
}

namespace eval ::vc::fossil::import::cvs::pass {
    namespace export collrev
    namespace eval collrev {

	namespace import ::vc::rcs::parser

	namespace import ::vc::fossil::import::cvs::repository
	namespace import ::vc::fossil::import::cvs::state
	namespace import ::vc::tools::trouble
	namespace import ::vc::tools::log
	log register collrev
    }
}

# # ## ### ##### ######## ############# #####################
## Ready

package provide vc::fossil::import::cvs::pass::collrev 1.0
return