Posted to tcl by mjanssen at Mon Jan 28 21:15:09 GMT 2008view pretty

rong # args: should be "::vc::fossil::import::cvs::file::Snit_constructor type selfns win self id path usrpath executable project"
    while executing
"::vc::fossil::import::cvs::file::Snit_constructor ::vc::fossil::import::cvs::file ::vc::fossil::import::cvs::file::Snit_inst1 ::vc:
:fossil::import::cv..."
    ("eval" body line 1)
    invoked from within
"eval [linsert $arglist 0  ${type}::Snit_constructor $type $selfns $instance $instance]"
    (procedure "RT.ConstructInstance" line 9)
    invoked from within
"RT.ConstructInstance $type $selfns $name $args"
    (procedure "::snit::RT.type.typemethod.create" line 45)
    invoked from within
"::snit::RT.type.typemethod.create ::vc::fossil::import::cvs::file exists st"
    ("uplevel" body line 1)
    invoked from within
"uplevel 1 $command $args"
    invoked from within
"file exists $path"
    (procedure "::vc::fossil::import::cvs::state::Snit_typemethodusedb" line 17)
    invoked from within
"state usedb [Value arguments] "
    (procedure "::vc::fossil::import::cvs::option::Snit_typemethodprocess" line 22)
    invoked from within
"option process $arguments"
    (procedure "::vc::fossil::import::cvs::Snit_typemethodrun" line 9)
    invoked from within
"vc::fossil::import::cvs run $argv"
    (file "../src/fossil/tools/cvs2fossil/cvs2fossil" line 29)