diff options
| author | kdx <kdx.42@42l.fr> | 2023-04-14 04:56:14 +0000 |
|---|---|---|
| committer | kdx <kdx.42@42l.fr> | 2023-04-14 04:56:14 +0000 |
| commit | 0b9399cb2e553b1c5a67bd6b3f14bd45b69249d5 (patch) | |
| tree | 1aaf564146b2d88ccd4d6ee26fd772d358f0736e /src | |
| parent | dcbc2dfa4dba9bf800d730f76f3c63faa3accb81 (diff) | |
| download | orga-0b9399cb2e553b1c5a67bd6b3f14bd45b69249d5.tar.gz | |
shorthand for literal label
Diffstat (limited to 'src')
| -rw-r--r-- | src/orgaasm.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/orgaasm.c b/src/orgaasm.c index 18a0e54..63581b7 100644 --- a/src/orgaasm.c +++ b/src/orgaasm.c @@ -150,6 +150,7 @@ first_pass(char *s) case '@': /* label marker */ register_label(tok + 1, pc); break; + case '-': /* literal label */ case '#': /* literal marker */ pc += 2; break; @@ -168,6 +169,9 @@ second_pass(char *s) switch (tok[0]) { case '@': /* label declaration, skip */ continue; + case '-': /* literal label insertion */ + write_short(OP_LIT); + /* fallthrough */ case ',': /* label insertion */ write_label(tok + 1); continue; |