File: stmt009_while.v

package info (click to toggle)
vbs 1.4.0-9
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 2,200 kB
  • ctags: 4,401
  • sloc: cpp: 17,648; yacc: 1,880; ansic: 884; makefile: 419; sh: 375; lex: 345
file content (26 lines) | stat: -rw-r--r-- 316 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
/*
 * Test while loop.
 *  dependencies:
 *	register declaration
 *	initial procedural block
 *	system tasks
 *	blocking assignment
 *	subtract expression
 */

module main ;

	reg [0:7] a;

	initial
		begin
		a = 5;
		while (a > 0)
			begin
			$write("a = %d\n", a);
			a = a - 1;
			end
		$finish;
		end

endmodule