*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 21 Aug 2000 16:17:59 +0200
changeset 5549 30a2dde72cf5
parent 5548 eead51e4752e
child 5550 01ad51c71b0e
*** empty log message ***
ByteArray.st
--- a/ByteArray.st	Mon Aug 21 15:26:29 2000 +0200
+++ b/ByteArray.st	Mon Aug 21 16:17:59 2000 +0200
@@ -1851,6 +1851,9 @@
             }
         }
     }
+#undef OP_LOOP_BYTES
+#undef OP_LOOP
+
 %}.
     ruleSymbol == #copy ifTrue:[
         self replaceFrom:dstStart to:dstEnd with:sourceBytes startingAt:sourceStart.
@@ -1991,6 +1994,8 @@
             }
         }
     }
+#undef OP_LOOP_BYTES
+#undef OP_LOOP
 %}.
     ruleSymbol == #copy ifTrue:[
         self from:dstStart to:dstEnd put:sourceByte.
@@ -3167,5 +3172,5 @@
 !ByteArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ByteArray.st,v 1.140 2000-07-18 08:58:51 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ByteArray.st,v 1.141 2000-08-21 14:17:59 cg Exp $'
 ! !