ref: 08545643cfb75b02a23e1af6b853f1432dd422f0
parent: 140c6b169e1b70443ddb1fe3b8ecf235e7fd0dcd
author: Rangi <[email protected]>
date: Fri Sep 30 15:04:03 EDT 2022
Only define `@` and `_NARG` when they have values (#1073) Fixes #1069 Co-authored-by: Eldred Habert <[email protected]>
--- a/include/asm/symbol.h
+++ b/include/asm/symbol.h
@@ -127,6 +127,8 @@
struct Symbol *sym_FindUnscopedSymbol(char const *symName);
// Find a symbol, possibly scoped, by name
struct Symbol *sym_FindScopedSymbol(char const *symName);
+// Find a scoped symbol by name; do not return `@` or `_NARG` when they have no value
+struct Symbol *sym_FindScopedValidSymbol(char const *symName);
struct Symbol const *sym_GetPC(void);
struct Symbol *sym_AddMacro(char const *symName, int32_t defLineNo, char *body, size_t size);
struct Symbol *sym_Ref(char const *symName);
--- a/src/asm/lexer.c
+++ b/src/asm/lexer.c
@@ -733,7 +733,7 @@
}
symName[i] = '\0';
- struct Symbol const *sym = sym_FindScopedSymbol(symName);
+ struct Symbol const *sym = sym_FindScopedValidSymbol(symName);
if (!sym) {
error("Bracketed symbol \"%s\" does not exist\n", symName);
@@ -1400,7 +1400,7 @@
static char buf[MAXSTRLEN + 1];
- struct Symbol const *sym = sym_FindScopedSymbol(symName);
+ struct Symbol const *sym = sym_FindScopedValidSymbol(symName);
if (!sym) {
error("Interpolated symbol \"%s\" does not exist\n", symName);
--- a/src/asm/parser.y
+++ b/src/asm/parser.y
@@ -1462,10 +1462,8 @@
| T_OP_DEF {
lexer_ToggleStringExpansion(false);
} T_LPAREN scoped_anon_id T_RPAREN {
- struct Symbol const *sym = sym_FindScopedSymbol($4);
+ rpn_Number(&$$, sym_FindScopedValidSymbol($4) != NULL);
- rpn_Number(&$$, !!sym);
-
lexer_ToggleStringExpansion(true);
}
| T_OP_ROUND T_LPAREN const T_RPAREN {
@@ -1590,7 +1588,7 @@
freeStrFmtArgList(&$3);
}
| T_POP_SECTION T_LPAREN scoped_anon_id T_RPAREN {
- struct Symbol *sym = sym_FindScopedSymbol($3);
+ struct Symbol *sym = sym_FindScopedValidSymbol($3);
if (!sym)
fatalerror("Unknown symbol \"%s\"\n", $3);
--- a/src/asm/symbol.c
+++ b/src/asm/symbol.c
@@ -36,6 +36,7 @@
static const char *labelScope; // Current section's label scope
static struct Symbol *PCSymbol;
+static struct Symbol *_NARGSymbol;
static char savedTIME[256];
static char savedDATE[256];
static char savedTIMESTAMP_ISO8601_LOCAL[256];
@@ -250,6 +251,21 @@
return sym_FindExactSymbol(symName);
}
+struct Symbol *sym_FindScopedValidSymbol(char const *symName)
+{
+ struct Symbol *sym = sym_FindScopedSymbol(symName);
+
+ // `@` has no value outside a section
+ if (sym == PCSymbol && !sect_GetSymbolSection()) {
+ return NULL;
+ }
+ // `_NARG` has no value outside a macro
+ if (sym == _NARGSymbol && !macro_GetCurrentArgs()) {
+ return NULL;
+ }
+ return sym;
+}
+
struct Symbol const *sym_GetPC(void)
{
return PCSymbol;
@@ -263,7 +279,7 @@
// Purge a symbol
void sym_Purge(char const *symName)
{
- struct Symbol *sym = sym_FindScopedSymbol(symName);
+ struct Symbol *sym = sym_FindScopedValidSymbol(symName);
if (!sym) {
error("'%s' not defined\n", symName);
@@ -682,7 +698,7 @@
void sym_Init(time_t now)
{
PCSymbol = createBuiltinSymbol("@");
- struct Symbol *_NARGSymbol = createBuiltinSymbol("_NARG");
+ _NARGSymbol = createBuiltinSymbol("_NARG");
// __LINE__ is deprecated
struct Symbol *__LINE__Symbol = createBuiltinSymbol("__LINE__");
// __FILE__ is deprecated
--- a/test/asm/[email protected]
+++ /dev/null
@@ -1,2 +1,0 @@
-if "{@}"
-endc
--- a/test/asm/[email protected]
+++ /dev/null
@@ -1,5 +1,0 @@
-error: [email protected](1):
- PC has no value outside a section
-warning: [email protected](1): [-Wnumeric-string]
- Treating 2-character string as a number
-error: Assembly aborted (1 error)!
--- a/test/asm/narg-nosect.asm
+++ /dev/null
@@ -1,1 +1,0 @@
- PRINTLN "{_NARG}"
--- a/test/asm/narg-nosect.err
+++ /dev/null
@@ -1,3 +1,0 @@
-error: narg-nosect.asm(1):
- _NARG does not make sense outside of a macro
-error: Assembly aborted (1 error)!
--- a/test/asm/narg-nosect.out
+++ /dev/null
@@ -1,1 +1,0 @@
-$0
--- a/test/asm/pc-def.asm
+++ /dev/null
@@ -1,5 +1,0 @@
-IF DEF(@)
- PRINTLN "defined"
-ELSE
- PRINTLN "not defined"
-ENDC
--- a/test/asm/pc-def.out
+++ /dev/null
@@ -1,1 +1,0 @@
-defined
--- /dev/null
+++ b/test/asm/undefined-builtins.asm
@@ -1,0 +1,21 @@
+; not inside a section
+assert !DEF(@)
+println @
+println "{@}?"
+
+; not inside a macro
+assert !DEF(_NARG)
+println _NARG
+println "{_NARG}?"
+
+SECTION "s", ROM0[$42]
+assert DEF(@)
+println @
+println "{@}!"
+
+MACRO m
+ assert DEF(_NARG)
+ println _NARG
+ println "{_NARG}!"
+ENDM
+ m 1, 2, 3
--- /dev/null
+++ b/test/asm/undefined-builtins.err
@@ -1,0 +1,9 @@
+error: undefined-builtins.asm(3):
+ PC has no value outside a section
+error: undefined-builtins.asm(4):
+ Interpolated symbol "@" does not exist
+error: undefined-builtins.asm(8):
+ _NARG does not make sense outside of a macro
+error: undefined-builtins.asm(9):
+ Interpolated symbol "_NARG" does not exist
+error: Assembly aborted (4 errors)!
--- /dev/null
+++ b/test/asm/undefined-builtins.out
@@ -1,0 +1,8 @@
+$0
+?
+$0
+?
+$42
+$42!
+$3
+$3!