File: funcx2y.apoo

package info (click to toggle)
apoo 2.2-2
  • links: PTS
  • area: main
  • in suites: jessie, jessie-kfreebsd, squeeze, wheezy
  • size: 560 kB
  • ctags: 425
  • sloc: python: 3,092; perl: 100; makefile: 56; sh: 4
file content (17 lines) | stat: -rw-r--r-- 196 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
x: const	-6
y: const	-5
func: mem  	1
	load x R0
	load y R1
	storer R1 R2
	sub R0 R2	
	jneg R2 cont
	mul R0 R0
	mul R1 R0
	store R0 func
	halt
cont:   loadn 5 R3
	sub R3 R1
	store R1 func
	halt