URL
https://opencores.org/ocsvn/alu_with_selectable_inputs_and_outputs/alu_with_selectable_inputs_and_outputs/trunk
Subversion Repositories alu_with_selectable_inputs_and_outputs
[/] [alu_with_selectable_inputs_and_outputs/] [trunk/] [sv_files/] [simvision_improved_test.sv] - Rev 6
Go to most recent revision | Compare with Previous | Blame | View Log
# SimVision Command Script (Sat Jan 06 15:05:30 EET 2007)
#
# Version 05.50.s003
#
# You can restore this configuration with:
#
# simvision -input simvision_ac.sv
# or
# simvision -input simvision_ac.sv database1 database2 ...
#
#
# preferences
#
preferences set signal-type-colors {
group #0000FF
overlay #0000FF
input #FFFF00
output #FFA500
inout #00FFFF
internal #00FF00
fiber #FF99FF
errorsignal #FF0000
assertion #FF0000
unknown #FFFFFF
}
preferences set sb-syntax-types {
{-name "VHDL/VHDL-AMS" -cleanname "vhdl" -extensions {.vhd .vhdl}}
{-name "Verilog/Verilog-AMS" -cleanname "verilog" -extensions {.v .vams .vms .va}}
{-name "C" -cleanname "c" -extensions {.c}}
{-name "C++" -cleanname "c++" -extensions {.h .hpp .cc .cpp .CC}}
{-name "SystemC" -cleanname "systemc" -extensions {.h .hpp .cc .cpp .CC}}
}
preferences set toolbar-Windows-SrcBrowser {
usual
hide icheck
}
preferences set key-bindings {
Edit>Undo "Ctrl+Z"
Edit>Redo "Ctrl+Y"
Edit>Copy "Ctrl+C"
Edit>Cut "Ctrl+X"
Edit>Paste "Ctrl+V"
Edit>Delete "Del"
Select>All "Ctrl+A"
Edit>Select>All "Ctrl+A"
Edit>SelectAll "Ctrl+A"
openDB "Ctrl+O"
Simulation>Run "F2"
Simulation>Next "F6"
Simulation>Step "F5"
#Schematic window
View>Zoom>Fit "Alt+="
View>Zoom>In "Alt+I"
View>Zoom>Out "Alt+O"
#Waveform Window
View>Zoom>InX "Alt+I"
View>Zoom>OutX "Alt+O"
View>Zoom>FullX "Alt+="
View>Zoom>InX_widget "I"
View>Zoom>OutX_widget "O"
View>Zoom>FullX_widget "="
View>Zoom>FullY_widget "Y"
View>Zoom>Cursor-Baseline "Alt+Z"
View>Center "Alt+C"
View>ExpandSequenceTime>AtCursor "Alt+X"
View>CollapseSequenceTime>AtCursor "Alt+S"
Edit>Create>Group "Ctrl+G"
Edit>Ungroup "Ctrl+Shift+G"
Edit>Create>Marker "Ctrl+M"
Edit>Create>Condition "Ctrl+E"
Edit>Create>Bus "Ctrl+W"
Explore>NextEdge "Ctrl+]"
Explore>PreviousEdge "Ctrl+["
ScrollRight "Right arrow"
ScrollLeft "Left arrow"
ScrollUp "Up arrow"
ScrollDown "Down arrow"
PageUp "PageUp"
PageDown "PageDown"
TopOfPage "Home"
BottomOfPage "End"
}
preferences set toolbar-Windows-WaveWindow {
usual
hide icheck
position -pos 3
}
preferences set toolbar-Windows-WatchList {
usual
hide icheck
}
#
# databases
#
database require waves -hints {
file ./waves/waves.trn
file /home/student/pvlsi/dragos/proj_new1/waves/waves.trn
file /home/student/pvlsi/dragos/proj_new1/waves_improved_test/waves_improved_test.trn
}
#
# groups
#
if {[catch {group new -name SELECTOR -overlay 0}] != ""} {
group using SELECTOR
group set -overlay 0
group set -comment {}
group clear 0 end
}
group insert \
proj_improved_test.dut.selector.clk \
proj_improved_test.dut.selector.res \
proj_improved_test.dut.selector.stb \
proj_improved_test.dut.selector.data_valid_in \
{proj_improved_test.dut.selector.sel[1:0]} \
{proj_improved_test.dut.selector.data_in_0[7:0]} \
{proj_improved_test.dut.selector.data_in_1[7:0]} \
{proj_improved_test.dut.selector.data_in_2[7:0]} \
{proj_improved_test.dut.selector.data_out[7:0]} \
proj_improved_test.dut.selector.data_valid_out \
{proj_improved_test.dut.selector.reg_sel[1:0]} \
proj_improved_test.dut.selector.stb_out
if {[catch {group new -name ALU -overlay 0}] != ""} {
group using ALU
group set -overlay 0
group set -comment {}
group clear 0 end
}
group insert \
proj_improved_test.dut.alu.clk \
proj_improved_test.dut.alu.res \
proj_improved_test.dut.alu.alu_stb_in \
proj_improved_test.dut.alu.alu_data_valid_in \
{proj_improved_test.dut.alu.operator_type[3:0]} \
{proj_improved_test.dut.alu.operator_symbol[2:0]} \
{proj_improved_test.dut.alu.alu_data_in[7:0]} \
{proj_improved_test.dut.alu.alu_result[15:0]} \
proj_improved_test.dut.alu.result_parity \
proj_improved_test.dut.alu.output_channel \
proj_improved_test.dut.alu.alu_stb_out \
proj_improved_test.dut.alu.executed_case_once \
proj_improved_test.dut.alu.i \
proj_improved_test.dut.alu.j
if {[catch {group new -name {Group 3} -overlay 0}] != ""} {
group using {Group 3}
group set -overlay 0
group set -comment {}
group clear 0 end
}
group insert \
{proj_improved_test.dut.dmux.alu_result[15:0]} \
proj_improved_test.dut.dmux.clk \
proj_improved_test.dut.dmux.dmux_stb_in \
{proj_improved_test.dut.dmux.out_0[15:0]} \
{proj_improved_test.dut.dmux.out_1[15:0]} \
proj_improved_test.dut.dmux.output_channel \
proj_improved_test.dut.dmux.parity_0 \
proj_improved_test.dut.dmux.parity_1 \
proj_improved_test.dut.dmux.res \
proj_improved_test.dut.dmux.result_parity \
proj_improved_test.dut.dmux.valid_0 \
proj_improved_test.dut.dmux.valid_1
if {[catch {group new -name DMUX -overlay 0}] != ""} {
group using DMUX
group set -overlay 0
group set -comment {}
group clear 0 end
}
group insert \
proj_improved_test.dut.dmux.clk \
proj_improved_test.dut.dmux.res \
proj_improved_test.dut.dmux.dmux_stb_in \
proj_improved_test.dut.dmux.output_channel \
{proj_improved_test.dut.dmux.alu_result[15:0]} \
proj_improved_test.dut.dmux.result_parity \
{proj_improved_test.dut.dmux.out_0[15:0]} \
{proj_improved_test.dut.dmux.out_1[15:0]} \
proj_improved_test.dut.dmux.parity_0 \
proj_improved_test.dut.dmux.parity_1 \
proj_improved_test.dut.dmux.valid_0 \
proj_improved_test.dut.dmux.valid_1
#
# mmaps
#
mmap new -reuse -name {Boolean as Logic} -contents {
{%c=FALSE -edgepriority 1 -shape low}
{%c=TRUE -edgepriority 1 -shape high}
}
mmap new -reuse -name {Example Map} -contents {
{%b=11???? -bgcolor orange -label REG:%x -linecolor yellow -shape bus}
{%x=1F -bgcolor red -label ERROR -linecolor white -shape EVENT}
{%x=2C -bgcolor red -label ERROR -linecolor white -shape EVENT}
{%x=* -label %x -linecolor gray -shape bus}
}
#
# Design Browser windows
#
if {[catch {window new WatchList -name "Design Browser 1" -geometry 1265x915+0+0}] != ""} {
window geometry "Design Browser 1" 1265x915+0+0
}
window target "Design Browser 1" on
browser using {Design Browser 1}
browser set \
-scope proj_improved_test.dut.dmux
browser yview see proj_improved_test.dut.dmux
browser timecontrol set -lock 0
#
# Waveform windows
#
if {[catch {window new WaveWindow -name "Waveform 1" -geometry 1278x915+0+0}] != ""} {
window geometry "Waveform 1" 1278x915+0+0
}
window target "Waveform 1" on
waveform using {Waveform 1}
waveform sidebar visibility partial
waveform set \
-primarycursor TimeA \
-signalnames name \
-signalwidth 175 \
-units ns \
-valuewidth 116
cursor set -using TimeA -time 115ns
waveform baseline set -time 0
set groupId [waveform add -groups SELECTOR]
set glist [waveform hierarchy contents $groupId]
set id [lindex $glist 0]
foreach {name attrs} {
proj_improved_test.dut.selector.clk {}
proj_improved_test.dut.selector.res {}
proj_improved_test.dut.selector.stb {}
proj_improved_test.dut.selector.data_valid_in {}
proj_improved_test.dut.selector.sel {}
proj_improved_test.dut.selector.data_in_0 {}
proj_improved_test.dut.selector.data_in_1 {}
proj_improved_test.dut.selector.data_in_2 {-radix %x}
proj_improved_test.dut.selector.data_out {-radix %x}
proj_improved_test.dut.selector.data_valid_out {}
proj_improved_test.dut.selector.reg_sel {}
proj_improved_test.dut.selector.stb_out {}
} {
set expected [ join [waveform signals -format native $id] ]
if {[string equal $name $expected]} {
if {$attrs != ""} {
eval waveform format $id $attrs
}
set glist [lrange $glist 1 end]
set id [lindex $glist 0]
}
}
set groupId [waveform add -groups ALU]
set glist [waveform hierarchy contents $groupId]
set id [lindex $glist 0]
foreach {name attrs} {
proj_improved_test.dut.alu.clk {}
proj_improved_test.dut.alu.res {}
proj_improved_test.dut.alu.alu_stb_in {}
proj_improved_test.dut.alu.alu_data_valid_in {}
proj_improved_test.dut.alu.operator_type {}
proj_improved_test.dut.alu.operator_symbol {}
proj_improved_test.dut.alu.alu_data_in {-radix %x}
proj_improved_test.dut.alu.alu_result {-radix %x}
proj_improved_test.dut.alu.result_parity {}
proj_improved_test.dut.alu.output_channel {}
proj_improved_test.dut.alu.alu_stb_out {}
proj_improved_test.dut.alu.executed_case_once {}
proj_improved_test.dut.alu.i {}
proj_improved_test.dut.alu.j {}
} {
set expected [ join [waveform signals -format native $id] ]
if {[string equal $name $expected]} {
if {$attrs != ""} {
eval waveform format $id $attrs
}
set glist [lrange $glist 1 end]
set id [lindex $glist 0]
}
}
set groupId [waveform add -groups DMUX]
set id [waveform add -signals [list proj_improved_test.dut.dmux.i \
proj_improved_test.dut.dmux.dmux_stb_in_was_1 ]]
waveform xview limits 0 200ns
Go to most recent revision | Compare with Previous | Blame | View Log