gbdev/rgbds
1
0
Fork 0
mirror of https://github.com/gbdev/rgbds.git synced 2025-11-28 05:47:48 +00:00
Code Issues Packages Projects Releases Wiki Activity

Add test to demonstrate lack of expansions in skipIfBlock (#1516)

Browse Source
This commit is contained in:
Sylvie
2024-09-22 15:31:12 -04:00
committed by GitHub
parent f93587c805
commit 15919e550f
3 changed files with 44 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
test/asm/skip-expansions.asm Normal file
View File

@@ -0,0 +1,31 @@
; skipping ahead to `elif`/`else`/`endc`/`endr`/`endm` disables expansions!
MACRO mac1
if _NARG != 2
println "args: \#"
elif (\2) == 42
println "forty-two!"
else
println "it's ", (\2)
endc
ENDM
mac1 elif, 6 * 7 ; this prints "forty-two!" because it takes the `elif`
mac1 elif, 6 * 9
mac1 elif
mac1
MACRO mac2
if _NARG != 2
println "args: \#"
\1 (\2) == 42 ; if the `if` is not taken, this is not expanded!
println "forty-two!"
else
println "it's ", (\2)
endc
ENDM
mac2 elif, 6 * 7 ; this prints "it's $2A" because it skips the `\1` line and takes the `else`
mac2 elif, 6 * 9
mac2 elif
mac2