as: bracket or square...

Z80 and 6502 use () to indicate a layer of indirection, so the assembler uses
[] for expressions

6809 uses [] for indirect, so we need to use () for expressions

diff --git a/Applications/MWC/cmd/asz80/as3.c b/Applications/MWC/cmd/asz80/as3.c
index f86da3c..b448ac7 100644 (file)
--- a/Applications/MWC/cmd/asz80/as3.c
+++ b/Applications/MWC/cmd/asz80/as3.c
@@ -158,12 +158,21 @@ void expr2(ADDR *ap)
        char id[NCPS];
 
        c = getnb();
+#ifndef TARGET_USES_SQUARE
        if (c == '[') {
                expr1(ap, LOPRI, 0);
                if (getnb() != ']')
                        qerr(SQUARE_EXPECTED);
                return;
        }
+#else
+       if (c == '(') {
+               expr1(ap, LOPRI, 0);
+               if (getnb() != ')')
+                       qerr(BRACKET_EXPECTED);
+               return;
+       }
+#endif
        if (c == '-') {
                expr1(ap, HIPRI, 0);
                istuser(ap);