;; while

;; while i < n
;;    i = i + 1

;; let i = r1, n = r2, t = r3

.a 0
.c
	ld r2 #10
:loop	sub r3 r1 r2	;; i-n < 0
	jmp ge exit
	add r1 r1 #1
	jmp always loop
:exit	trap print r1
	trap stop r0
.e
