Fix a couple of bad EXPUNGEs.

I don't think we can easily get rid of all of these...

diff --git a/<mdl.int>/muddle.347 b/<mdl.int>/muddle.347
index cb732d5704fba6a332e0645147aa6212464dd1ee..a7504a5598518e672d6e6718b867b026df971774 100644 (file)
--- a/<mdl.int>/muddle.347
+++ b/<mdl.int>/muddle.347
@@ -460,7 +460,7 @@ TERMIN
 ]
 
 
-RMT [EXPUNGE GENERAL,NUMSTA
+RMT [EXPUNGE GENERAL,NUMSAT
 ]
 
 DEFINE XPUNGR A
@@ -578,7 +578,7 @@ TYPMAK SOFFS,[[OFFS,OFFSET]]
 IFN MAIN,[RMT [LOC SAVE
        ]
        ]
-IF2,EXPUNGE TYPMAK,DOTYPS
+IF2,EXPUNGE TYPMAK
 \f
 RMT [EQUALS XP EXPUNGE
 IF2,XP STMPLT