diff options
| author | Jan Tuomi <jan@jantuomi.fi> | 2025-03-18 18:40:14 +0200 |
|---|---|---|
| committer | Jan Tuomi <jan@jantuomi.fi> | 2025-03-18 18:40:14 +0200 |
| commit | 182c35d5aee98ab2afa27c2e84427206edb9a9ca (patch) | |
| tree | 1dd2f8f0829c045a041ed65529d19d0934f338f4 /atk16_schasm/utils.scm | |
| parent | 69de37cdb25563f6cbd2a3c1a338b1e0dd47b3a4 (diff) | |
schasm updates
Diffstat (limited to 'atk16_schasm/utils.scm')
| -rw-r--r-- | atk16_schasm/utils.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/atk16_schasm/utils.scm b/atk16_schasm/utils.scm index f5e74e3..06160ab 100644 --- a/atk16_schasm/utils.scm +++ b/atk16_schasm/utils.scm @@ -41,8 +41,8 @@ (unless (<= (length offsets) 1) (error "only one imm or label can be supplied as rhs")) - (define rhs (if (null? regs) ZR (car regs))) - (define offset (if (null? offsets) (imm 0) (car offsets))) + (define rhs (if (null? regs) ZR (car regs))) + (define offset (if (null? offsets) #f (car offsets))) (cons rhs offset)) |