mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
23 lines
401 B
Scheme
23 lines
401 B
Scheme
;-*-Scheme-*-
|
|
|
|
|
|
(test-setup 7 #f)
|
|
|
|
(block outer-block
|
|
1
|
|
2
|
|
(block inner-block
|
|
3
|
|
4
|
|
(return-from inner-block 7)
|
|
5
|
|
6
|
|
)
|
|
)
|
|
|
|
;; with v1. const prop and fancy coloring:
|
|
; 0: b8 07 00 00 00 mov eax,0x7
|
|
; 5: e9 05 00 00 00 jmp 0xf
|
|
; a: b8 06 00 00 00 mov eax,0x6
|
|
; f: c3 ret
|