Fixing some examples, adding scripts for compiling xilinx libs with ghdl

Examples/sram_gpio/logic/simulation/glbl.v

@@ -0,0 +1,58 @@
+// $Header: /devl/xcs/repo/env/Databases/CAEInterfaces/verunilibs/data/glbl.v,v 1.11.156.1 2007/03/09 18:12:55 patrickp Exp $
+
+`timescale  1 ps / 1 ps
+
+module glbl ();
+
+    parameter ROC_WIDTH = 100000;
+    parameter TOC_WIDTH = 0;
+
+    wire GSR;
+    wire GTS;
+    wire PRLD;
+
+    reg GSR_int;
+    reg GTS_int;
+    reg PRLD_int;
+
+//--------   JTAG Globals --------------
+    wire JTAG_TDO_GLBL;
+    wire JTAG_TCK_GLBL;
+    wire JTAG_TDI_GLBL;
+    wire JTAG_TMS_GLBL;
+    wire JTAG_TRST_GLBL;
+
+    reg JTAG_CAPTURE_GLBL;
+    reg JTAG_RESET_GLBL;
+    reg JTAG_SHIFT_GLBL;
+    reg JTAG_UPDATE_GLBL;
+
+    reg JTAG_SEL1_GLBL = 0;
+    reg JTAG_SEL2_GLBL = 0 ;
+    reg JTAG_SEL3_GLBL = 0;
+    reg JTAG_SEL4_GLBL = 0;
+
+    reg JTAG_USER_TDO1_GLBL = 1'bz;
+    reg JTAG_USER_TDO2_GLBL = 1'bz;
+    reg JTAG_USER_TDO3_GLBL = 1'bz;
+    reg JTAG_USER_TDO4_GLBL = 1'bz;
+
+    assign (weak1, weak0) GSR = GSR_int;
+    assign (weak1, weak0) GTS = GTS_int;
+    assign (weak1, weak0) PRLD = PRLD_int;
+
+    initial begin
+	GSR_int = 1'b1;
+	PRLD_int = 1'b1;
+	#(ROC_WIDTH)
+	GSR_int = 1'b0;
+	PRLD_int = 1'b0;
+    end
+
+    initial begin
+	GTS_int = 1'b1;
+	#(TOC_WIDTH)
+	GTS_int = 1'b0;
+    end
+
+endmodule

Examples/sram_gpio/logic/simulation/sram_bus_TB.do

@@ -0,0 +1,12 @@
+vlib work
+vlog   -incr +libext+.v                    \
+			"../sram_bus.v"       \
+			"../sram_bus_TB.v"    \
+			"glbl.v"
+vsim -t 1ps -L simprims_ver -L unisims_ver -L xilinxcorelib_ver sram_bus_TB glbl
+view wave
+#do wave.do
+add wave *
+view structure
+view signals
+run 5us

Examples/sram_gpio/logic/simulation/sram_bus_TIMING_TB.do

@@ -0,0 +1,9 @@
+vlib work
+vlog   -incr "../build/project.v" "../sram_bus_TB.v" "glbl.v"
+vsim -t 1ps -L simprims_ver -L unisims_ver -L xilinxcorelib_ver   sram_bus_TB glbl
+view wave
+#do wave.do
+add wave *
+view structure
+view signals
+run 5us

Examples/sram_gpio/logic/simulation/transcript

@@ -0,0 +1,34 @@
+# //  ModelSim SE 6.0d Apr 25 2005 Linux 2.6.32-22-generic
+# //
+# //  Copyright Mentor Graphics Corporation 2005
+# //              All Rights Reserved.
+# //
+# //  THIS WORK CONTAINS TRADE SECRET AND 
+# //  PROPRIETARY INFORMATION WHICH IS THE PROPERTY
+# //  OF MENTOR GRAPHICS CORPORATION OR ITS LICENSORS
+# //  AND IS SUBJECT TO LICENSE TERMS.
+# //
+# do sram_bus_TB.do 
+# ** Warning: (vlib-34) Library already exists at "work".
+# Model Technology ModelSim SE vlog 6.0d Compiler 2005.04 Apr 25 2005
+# -- Compiling module sram_bus
+# -- Compiling module sram_bus_TB
+# -- Compiling module glbl
+# 
+# Top level modules:
+# 	sram_bus_TB
+# 	glbl
+# vsim -L simprims_ver -L unisims_ver -L xilinxcorelib_ver -t 1ps sram_bus_TB glbl 
+# Loading work.sram_bus_TB
+# Loading work.sram_bus
+# Loading /opt/cad/modeltech/xilinx/verilog/unisims_ver.RAMB16_S2
+# Loading work.glbl
+# ** Warning: (vsim-3017) ../sram_bus_TB.v(21): [TFMPC] - Too few port connections. Expected 8, found 7.
+#         Region: /sram_bus_TB/uut
+# ** Warning: (vsim-3015) ../sram_bus_TB.v(21): [PCDPC] - Port size (8 or 8) does not match connection size (1) for port 'sram_data'.
+#         Region: /sram_bus_TB/uut
+# ** Warning: (vsim-3722) ../sram_bus_TB.v(21): [TFMPC] - Missing connection for port 'led'.
+# .main_pane.mdi.interior.cs.vm.paneset.cli_0.wf.clip.cs
+# .main_pane.workspace
+# .main_pane.signals.interior.cs
+quit

Examples/sram_gpio/logic/simulation/wave.do

@@ -0,0 +1,29 @@
+onerror {resume}
+quietly WaveActivateNextPane {} 0
+add wave -noupdate -format Logic -radix hexadecimal /sram_bus_TB_v/clk
+add wave -noupdate -format Literal -radix hexadecimal /sram_bus_TB_v/addr
+add wave -noupdate -format Logic -radix hexadecimal /sram_bus_TB_v/nwe
+add wave -noupdate -format Logic -radix hexadecimal /sram_bus_TB_v/ncs
+add wave -noupdate -format Logic -radix hexadecimal /sram_bus_TB_v/noe
+add wave -noupdate -format Logic -radix hexadecimal /sram_bus_TB_v/reset
+add wave -noupdate -format Logic -radix hexadecimal /sram_bus_TB_v/led
+add wave -noupdate -format Literal -radix hexadecimal {/sram_bus_TB_v/sram_data$inout$reg}
+add wave -noupdate -format Logic -radix hexadecimal /sram_bus_TB_v/sram_data
+add wave -noupdate -format Literal -radix hexadecimal /sram_bus_TB_v/data_tx
+add wave -noupdate -format Logic -radix hexadecimal /glbl/GSR
+TreeUpdate [SetDefaultTree]
+WaveRestoreCursors {{Cursor 1} {154070 ps} 0}
+configure wave -namecolwidth 323
+configure wave -valuecolwidth 100
+configure wave -justifyvalue left
+configure wave -signalnamewidth 0
+configure wave -snapdistance 10
+configure wave -datasetprefix 0
+configure wave -rowmargin 4
+configure wave -childrowmargin 2
+configure wave -gridoffset 0
+configure wave -gridperiod 1
+configure wave -griddelta 40
+configure wave -timeline 0
+update
+WaveRestoreZoom {0 ps} {656250 ps}