MessageNode.st
changeset 624 e71abe9654e6
parent 602 1be5dd333adc
child 627 b29a02258247
--- a/MessageNode.st	Thu Oct 16 16:55:52 1997 +0200
+++ b/MessageNode.st	Tue Oct 21 19:32:56 1997 +0200
@@ -10,7 +10,7 @@
  hereby transferred.
 "
 
-'From Smalltalk/X, Version:3.1.9 on 29-aug-1997 at 8:24:43 pm'                  !
+'From Smalltalk/X, Version:3.2.1 on 19-oct-1997 at 2:50:36 pm'                  !
 
 ParseNode subclass:#MessageNode
 	instanceVariableNames:'receiver selector argArray lineNr selectorPosition'
@@ -1752,6 +1752,8 @@
 
     pos := aStream position.
 
+    aStream nextPut:#lineno; nextPut:lineNr.
+
     aStream nextPut:#dup.
     stopVarIndex notNil ifTrue:[
         b isNil ifTrue:[
@@ -1815,7 +1817,7 @@
     ].
 
     "Created: 26.6.1997 / 10:58:47 / cg"
-    "Modified: 27.6.1997 / 13:21:54 / cg"
+    "Modified: 19.10.1997 / 01:31:40 / cg"
 !
 
 codeWhileOn:aStream inBlock:b valueNeeded:valueNeeded for:aCompiler
@@ -2257,5 +2259,5 @@
 !MessageNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.81 1997-09-02 18:17:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.82 1997-10-21 17:32:52 cg Exp $'
 ! !