Don't use LOCS in two different type definitions (dubious).
authorAdam Sampson <ats@offog.org>
Thu, 19 Apr 2018 10:58:46 +0000 (11:58 +0100)
committerAdam Sampson <ats@offog.org>
Thu, 19 Apr 2018 10:58:46 +0000 (11:58 +0100)
The macros end up EXPUNGing it twice as a result.

<mdl.int>/muddle.347

index a7504a5598518e672d6e6718b867b026df971774..fa4e069c260438d4d917b9766f8a370048598e23 100644 (file)
@@ -425,7 +425,7 @@ DEFINE PRMACR HACKER
 
 IRP A,,[1WORD,2WORD,2DEFRD,NWORD,2NWORD,TPSTK,PSTK,ARGS
 ABASE,TBASE,FRAME,BYTE,ATOM,LOCID,PVP,CHSTR,ASOC,INFO,STORE
-LOCA,LOCD,LOCS,LOCU,LOCV,LOCL,LOCN,GATOM,LOCR,LOCT,RDTB,LOCB
+LOCA,LOCD,LOCS,LOCSX,LOCU,LOCV,LOCL,LOCN,GATOM,LOCR,LOCT,RDTB,LOCB
 DEFQ,OFFS]
 
 HACKER A
@@ -542,7 +542,7 @@ TYPMAK SBYTE,[[BYTE,BYTES]]
 TYPMAK SFRAME,[[ENV,ENVIRONMENT],[ACT,ACTIVATION,1,1]]
 TYPMAK SASOC,[ASOC]
 TYPMAK SLOCU,[[LOCU,,,1]]
-TYPMAK SLOCS,[[LOCS,,,1]]
+TYPMAK SLOCS,[[LOCSX,,,1]]
 TYPMAK SLOCA,[[LOCA,,,1]]
 TYPMAK S1WORD,[[CBLK,IN]]
 TYPMAK STMPLT,[[TMPLT,TEMPLATE,1,1]]