quit -sim cd .. #clear the simulator transcript window and make the wave,data & coverage director .main clear set wrap_args [list]; #put the do command $1-$9 to list,because we can't use the argv,we should construct the "argv" mannully. for {set i 1} {$i <= $argc} {incr i 1} { lappend wrap_args [set $i]; } #echo $args eval do runone.tcl $wrap_args