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

  1. rong # args: should be "::vc::fossil::import::cvs::file::Snit_constructor type selfns win self id path usrpath executable project"
  2. while executing
  3. "::vc::fossil::import::cvs::file::Snit_constructor ::vc::fossil::import::cvs::file ::vc::fossil::import::cvs::file::Snit_inst1 ::vc:
  4. :fossil::import::cv..."
  5. ("eval" body line 1)
  6. invoked from within
  7. "eval [linsert $arglist 0 ${type}::Snit_constructor $type $selfns $instance $instance]"
  8. (procedure "RT.ConstructInstance" line 9)
  9. invoked from within
  10. "RT.ConstructInstance $type $selfns $name $args"
  11. (procedure "::snit::RT.type.typemethod.create" line 45)
  12. invoked from within
  13. "::snit::RT.type.typemethod.create ::vc::fossil::import::cvs::file exists st"
  14. ("uplevel" body line 1)
  15. invoked from within
  16. "uplevel 1 $command $args"
  17. invoked from within
  18. "file exists $path"
  19. (procedure "::vc::fossil::import::cvs::state::Snit_typemethodusedb" line 17)
  20. invoked from within
  21. "state usedb [Value arguments] "
  22. (procedure "::vc::fossil::import::cvs::option::Snit_typemethodprocess" line 22)
  23. invoked from within
  24. "option process $arguments"
  25. (procedure "::vc::fossil::import::cvs::Snit_typemethodrun" line 9)
  26. invoked from within
  27. "vc::fossil::import::cvs run $argv"
  28. (file "../src/fossil/tools/cvs2fossil/cvs2fossil" line 29)