File: subsoma.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 (26 lines) | stat: -rw-r--r-- 220 bytes parent folder | download | duplicates (5) 
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
 
values:	const	3
	const	4
	const	5
n:    	const	3
res:	mem	1

	jsr	ini
	halt
ini:	zero 	R4
	loadn	values	R1
	load	n	R2
	rtn
loop:	jzero	R2	end
	loadi	R1	R4
	add	R4	R3
	dec	R2	
	inc	R1
	jump	loop
end:	store	R3	res