File: cup.ssa

package info (click to toggle)
qbe 1.2-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 2,004 kB
  • sloc: ansic: 13,368; yacc: 843; ml: 466; sh: 379; python: 232; makefile: 100
file content (18 lines) | stat: -rw-r--r-- 269 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
# counts up from -1988 to 1991

export
function $test() {
@start
@loop
	%n0  =l phi @start -1988, @loop %n1
	%n1  =l add 1, %n0
	%cmp =w cslel 1991, %n1
	jnz %cmp, @end, @loop
@end
	ret
}

# >>> driver
# extern void test(void);
# int main() { test(); return 0; }
# <<<