--- a/MessageNode.st Fri Jun 27 14:08:46 1997 +0200
+++ b/MessageNode.st Fri Jun 27 18:33:17 1997 +0200
@@ -835,9 +835,7 @@
"/ now, always inline #timesRepeat:;
"/ the receiver must understand #> and #-
-"/ (receiver isConstant and:[receiver evaluate isNumber]) ifTrue:[
- ^ self codeTimesRepeatOn:aStream inBlock:b valueNeeded:valueNeeded for:aCompiler.
-"/ ]
+ ^ self codeTimesRepeatOn:aStream inBlock:b valueNeeded:valueNeeded for:aCompiler.
].
((selector == #whileTrue:) or:[selector == #whileFalse:]) ifTrue:[
@@ -1064,7 +1062,7 @@
].
"Modified: 3.9.1995 / 12:55:42 / claus"
- "Modified: 27.6.1997 / 13:41:41 / cg"
+ "Modified: 27.6.1997 / 15:08:45 / cg"
!
codeOrIfElseOn:aStream inBlock:b valueNeeded:valueNeeded for:aCompiler
@@ -2122,5 +2120,5 @@
!MessageNode class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.74 1997-06-27 12:08:18 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.75 1997-06-27 16:33:17 cg Exp $'
! !