URL https://opencores.org/ocsvn/openmsp430/openmsp430/trunk

Subversion Repositories openmsp430

[/] [openmsp430/] [trunk/] [core/] [sim/] [rtl_sim/] [src/] [sing-op_reti.v] - Diff between revs 95 and 111

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 95	Rev 111
Line 27...	Line 27...
`/* */`	`/* */`
`/* Author(s): */`	`/* Author(s): */`
`/* - Olivier Girard, olgirard@gmail.com */`	`/* - Olivier Girard, olgirard@gmail.com */`
`/* */`	`/* */`
`/---------------------------------------------------------------------------/`	`/---------------------------------------------------------------------------/`
`/* $Rev: 95 $ */`	`/* $Rev: 111 $ */`
`/* $LastChangedBy: olivier.girard $ */`	`/* $LastChangedBy: olivier.girard $ */`
`/* $LastChangedDate: 2011-02-24 21:37:57 +0100 (Thu, 24 Feb 2011) $ */`	`/* $LastChangedDate: 2011-05-20 22:39:02 +0200 (Fri, 20 May 2011) $ */`
`/===========================================================================/`	`/===========================================================================/`

`integer i;`	`integer i;`
`reg [15:0] temp_val;`	`reg [15:0] temp_val;`

Line 63...	Line 63...


`// RETI Instruction test`	`// RETI Instruction test`
`//--------------------------`	`//--------------------------`
`@(r15==16'h2000);`	`@(r15==16'h2000);`
`if (r1 !==16'h0252) tb_error("====== RETI: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== RETI: SP value =====");
`if (r2 !==16'h0145) tb_error("====== RETI: SR value =====");`	`if (r2 !==16'h0145) tb_error("====== RETI: SR value =====");`
`if (r5 !==16'h1234) tb_error("====== RETI: R5 value =====");`	`if (r5 !==16'h1234) tb_error("====== RETI: R5 value =====");`


`// Test interruption 0`	`// Test interruption 0`
Line 77...	Line 77...
`irq[0] = 1'b1;`	`irq[0] = 1'b1;`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[0] = 1'b0;`	`irq[0] = 1'b0;`

`@(r15==16'h3001);`	`@(r15==16'h3001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 0: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 0: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 0: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 0: GIE value =====");`
`if (r6 !==16'h5678) tb_error("====== IRQ 0: R6 value =====");`	`if (r6 !==16'h5678) tb_error("====== IRQ 0: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 0: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 0: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 0: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 0: R8 value =====");


`// Test interruption 1`	`// Test interruption 1`
`//--------------------------`	`//--------------------------`
`@(r15==16'h4000);`	`@(r15==16'h4000);`
Line 93...	Line 93...
`irq[1:0] = {2{1'b1}};`	`irq[1:0] = {2{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[1:0] = 1'b0;`	`irq[1:0] = 1'b0;`

`@(r15==16'h4001);`	`@(r15==16'h4001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 1: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 1: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 1: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 1: GIE value =====");`
`if (r6 !==16'h9abc) tb_error("====== IRQ 1: R6 value =====");`	`if (r6 !==16'h9abc) tb_error("====== IRQ 1: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 1: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 1: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 1: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 1: R8 value =====");


`// Test interruption 2`	`// Test interruption 2`
`//--------------------------`	`//--------------------------`
`@(r15==16'h5000);`	`@(r15==16'h5000);`
Line 109...	Line 109...
`irq[2:0] = {3{1'b1}};`	`irq[2:0] = {3{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[2:0] = 1'b0;`	`irq[2:0] = 1'b0;`

`@(r15==16'h5001);`	`@(r15==16'h5001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 2: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 2: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 2: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 2: GIE value =====");`
`if (r6 !==16'hdef1) tb_error("====== IRQ 2: R6 value =====");`	`if (r6 !==16'hdef1) tb_error("====== IRQ 2: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 2: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 2: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 2: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 2: R8 value =====");


`// Test interruption 3`	`// Test interruption 3`
`//--------------------------`	`//--------------------------`
`@(r15==16'h6000);`	`@(r15==16'h6000);`
Line 125...	Line 125...
`irq[3:0] = {4{1'b1}};`	`irq[3:0] = {4{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[3:0] = 1'b0;`	`irq[3:0] = 1'b0;`

`@(r15==16'h6001);`	`@(r15==16'h6001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 3: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 3: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 3: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 3: GIE value =====");`
`if (r6 !==16'h2345) tb_error("====== IRQ 3: R6 value =====");`	`if (r6 !==16'h2345) tb_error("====== IRQ 3: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 3: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 3: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 3: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 3: R8 value =====");


`// Test interruption 4`	`// Test interruption 4`
`//--------------------------`	`//--------------------------`
`@(r15==16'h7000);`	`@(r15==16'h7000);`
Line 141...	Line 141...
`irq[4:0] = {5{1'b1}};`	`irq[4:0] = {5{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[4:0] = 1'b0;`	`irq[4:0] = 1'b0;`

`@(r15==16'h7001);`	`@(r15==16'h7001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 4: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 4: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 4: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 4: GIE value =====");`
`if (r6 !==16'h6789) tb_error("====== IRQ 4: R6 value =====");`	`if (r6 !==16'h6789) tb_error("====== IRQ 4: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 4: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 4: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 4: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 4: R8 value =====");


`// Test interruption 5`	`// Test interruption 5`
`//--------------------------`	`//--------------------------`
`@(r15==16'h8000);`	`@(r15==16'h8000);`
Line 157...	Line 157...
`irq[5:0] = {6{1'b1}};`	`irq[5:0] = {6{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[5:0] = 1'b0;`	`irq[5:0] = 1'b0;`

`@(r15==16'h8001);`	`@(r15==16'h8001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 5: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 5: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 5: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 5: GIE value =====");`
`if (r6 !==16'habcd) tb_error("====== IRQ 5: R6 value =====");`	`if (r6 !==16'habcd) tb_error("====== IRQ 5: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 5: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 5: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 5: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 5: R8 value =====");


`// Test interruption 6`	`// Test interruption 6`
`//--------------------------`	`//--------------------------`
`@(r15==16'h9000);`	`@(r15==16'h9000);`
Line 173...	Line 173...
`irq[6:0] = {7{1'b1}};`	`irq[6:0] = {7{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[6:0] = 1'b0;`	`irq[6:0] = 1'b0;`

`@(r15==16'h9001);`	`@(r15==16'h9001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 6: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 6: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 6: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 6: GIE value =====");`
`if (r6 !==16'hef12) tb_error("====== IRQ 6: R6 value =====");`	`if (r6 !==16'hef12) tb_error("====== IRQ 6: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 6: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 6: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 6: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 6: R8 value =====");


`// Test interruption 7`	`// Test interruption 7`
`//--------------------------`	`//--------------------------`
`@(r15==16'ha000);`	`@(r15==16'ha000);`
Line 189...	Line 189...
`irq[7:0] = {8{1'b1}};`	`irq[7:0] = {8{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[7:0] = 1'b0;`	`irq[7:0] = 1'b0;`

`@(r15==16'ha001);`	`@(r15==16'ha001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 7: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 7: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 7: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 7: GIE value =====");`
`if (r6 !==16'h3456) tb_error("====== IRQ 7: R6 value =====");`	`if (r6 !==16'h3456) tb_error("====== IRQ 7: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 7: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 7: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 7: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 7: R8 value =====");


`// Test interruption 8`	`// Test interruption 8`
`//--------------------------`	`//--------------------------`
`@(r15==16'hb000);`	`@(r15==16'hb000);`
Line 205...	Line 205...
`irq[8:0] = {9{1'b1}};`	`irq[8:0] = {9{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[8:0] = 1'b0;`	`irq[8:0] = 1'b0;`

`@(r15==16'hb001);`	`@(r15==16'hb001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 8: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 8: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 8: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 8: GIE value =====");`
`if (r6 !==16'h789a) tb_error("====== IRQ 8: R6 value =====");`	`if (r6 !==16'h789a) tb_error("====== IRQ 8: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 8: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 8: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 8: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 8: R8 value =====");


`// Test interruption 9`	`// Test interruption 9`
`//--------------------------`	`//--------------------------`
`@(r15==16'hc000);`	`@(r15==16'hc000);`
Line 221...	Line 221...
`irq[9:0] = {10{1'b1}};`	`irq[9:0] = {10{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[9:0] = 1'b0;`	`irq[9:0] = 1'b0;`

`@(r15==16'hc001);`	`@(r15==16'hc001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 9: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 9: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 9: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 9: GIE value =====");`
`if (r6 !==16'hbcde) tb_error("====== IRQ 9: R6 value =====");`	`if (r6 !==16'hbcde) tb_error("====== IRQ 9: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 9: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 9: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 9: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 9: R8 value =====");


`// Test interruption 10`	`// Test interruption 10`
`//--------------------------`	`//--------------------------`
`@(r15==16'hd000);`	`@(r15==16'hd000);`
Line 237...	Line 237...
`irq[10:0] = {11{1'b1}};`	`irq[10:0] = {11{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[10:0] = 1'b0;`	`irq[10:0] = 1'b0;`

`@(r15==16'hd001);`	`@(r15==16'hd001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 10: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 10: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 10: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 10: GIE value =====");`
`if (r6 !==16'hf123) tb_error("====== IRQ 10: R6 value =====");`	`if (r6 !==16'hf123) tb_error("====== IRQ 10: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 10: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 10: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 10: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 10: R8 value =====");


`// Test interruption 11`	`// Test interruption 11`
`//--------------------------`	`//--------------------------`
`@(r15==16'he000);`	`@(r15==16'he000);`
Line 253...	Line 253...
`irq[11:0] = {12{1'b1}};`	`irq[11:0] = {12{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[11:0] = 1'b0;`	`irq[11:0] = 1'b0;`

`@(r15==16'he001);`	`@(r15==16'he001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 11: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 11: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 11: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 11: GIE value =====");`
`if (r6 !==16'h4567) tb_error("====== IRQ 11: R6 value =====");`	`if (r6 !==16'h4567) tb_error("====== IRQ 11: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 11: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 11: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 11: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 11: R8 value =====");


`// Test interruption 12`	`// Test interruption 12`
`//--------------------------`	`//--------------------------`
`@(r15==16'hf000);`	`@(r15==16'hf000);`
Line 269...	Line 269...
`irq[12:0] = {13{1'b1}};`	`irq[12:0] = {13{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[12:0] = 1'b0;`	`irq[12:0] = 1'b0;`

`@(r15==16'hf001);`	`@(r15==16'hf001);`
`if (r1 !==16'h0252) tb_error("====== IRQ 12: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 12: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 12: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 12: GIE value =====");`
`if (r6 !==16'h89ab) tb_error("====== IRQ 12: R6 value =====");`	`if (r6 !==16'h89ab) tb_error("====== IRQ 12: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 12: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 12: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 12: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 12: R8 value =====");


`// Test interruption 13`	`// Test interruption 13`
`//--------------------------`	`//--------------------------`
`@(r15==16'hf100);`	`@(r15==16'hf100);`
Line 285...	Line 285...
`irq[13:0] = {14{1'b1}};`	`irq[13:0] = {14{1'b1}};`
`repeat(15) @(posedge mclk);`	`repeat(15) @(posedge mclk);`
`irq[13:0] = 1'b0;`	`irq[13:0] = 1'b0;`

`@(r15==16'hf101);`	`@(r15==16'hf101);`
`if (r1 !==16'h0252) tb_error("====== IRQ 13: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== IRQ 13: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== IRQ 13: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== IRQ 13: GIE value =====");`
`if (r6 !==16'hcdef) tb_error("====== IRQ 13: R6 value =====");`	`if (r6 !==16'hcdef) tb_error("====== IRQ 13: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== IRQ 13: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== IRQ 13: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== IRQ 13: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== IRQ 13: R8 value =====");


`// Test interruption NMI: rising edge`	`// Test interruption NMI: rising edge`
`//--------------------------------------`	`//--------------------------------------`
`@(r15==16'hf200);`	`@(r15==16'hf200);`
Line 305...	Line 305...
`nmi = 1'b0;`	`nmi = 1'b0;`
`repeat(2) @(posedge mclk);`	`repeat(2) @(posedge mclk);`
`irq[13:0] = 1'b0;`	`irq[13:0] = 1'b0;`

`@(r15==16'hf201);`	`@(r15==16'hf201);`
`if (r1 !==16'h0252) tb_error("====== NMI: SP value =====");`	if (r1 !==(`PER_SIZE+16'h0052)) tb_error("====== NMI: SP value =====");
`if (r2[3] !==1'b1) tb_error("====== NMI: GIE value =====");`	`if (r2[3] !==1'b1) tb_error("====== NMI: GIE value =====");`
`if (r6 !==16'h0123) tb_error("====== NMI: R6 value =====");`	`if (r6 !==16'h0123) tb_error("====== NMI: R6 value =====");`
`if (r7 !==16'h0000) tb_error("====== NMI: R7 value =====");`	`if (r7 !==16'h0000) tb_error("====== NMI: R7 value =====");`
`if (r8 !==16'h024e) tb_error("====== NMI: R8 value =====");`	if (r8 !==(`PER_SIZE+16'h004e)) tb_error("====== NMI: R8 value =====");

`if (r9 !==16'h0000) tb_error("====== NMI: NMIE value =====");`	`if (r9 !==16'h0000) tb_error("====== NMI: NMIE value =====");`
`if (r10 !==16'h0010) tb_error("====== NMI: NMIIFG value =====");`	`if (r10 !==16'h0010) tb_error("====== NMI: NMIIFG value =====");`

Browse

Tools

Subversion Repositories openmsp430

[/] [openmsp430/] [trunk/] [core/] [sim/] [rtl_sim/] [src/] [sing-op_reti.v] - Diff between revs 95 and 111