ModelSim SE User's Manual - Electrical and Computer Engineering

UM-486 20 - Tcl and macros (DO files)
ModelSim SE User’s Manual
}
}
}
## Provide file root argument and load_wave restores all saved windows.
## Default file root is "wave".
proc load_wave {{fileroot "wave"}} {
foreach f [lsort [glob -nocomplain $fileroot\[1-9\].do]] {
echo "Loading: $f"
view -new wave
do $f
}
if {[file exists windowSet_$fileroot.do]} {
do windowSet_$fileroot.do
}
}
...
This next example specifies the compiler arguments and lets you compile any number of
files.
set Files [list]
set nbrArgs $argc
for {set x 1} {$x 0} {
eval vlog $vFiles
}