test-suite/standalone/sassy/tests/prims16/16with-win5.scm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

(bits 16)

(text
  (mov ax 10)
; this should loop 7 times
  (label foo
    (if (= ax 3)
	(with-win (ret))
	(with-win foo
	  (sub ax 1)))))

; 00000000  B80A00            mov ax,0xa
; 00000003  3D0300            cmp ax,0x3
; 00000006  7501              jnz 0x9
; 00000008  C3                ret
; 00000009  2D0100            sub ax,0x1
; 0000000C  E9F4FF            jmp 0x3