equal
deleted
inserted
replaced
19 |
19 |
20 MessageNode comment:' |
20 MessageNode comment:' |
21 COPYRIGHT (c) 1989 by Claus Gittinger |
21 COPYRIGHT (c) 1989 by Claus Gittinger |
22 All Rights Reserved |
22 All Rights Reserved |
23 |
23 |
24 $Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.20 1995-02-26 18:20:45 claus Exp $ |
24 $Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.21 1995-02-28 21:01:58 claus Exp $ |
25 '! |
25 '! |
26 |
26 |
27 !MessageNode class methodsFor:'documentation'! |
27 !MessageNode class methodsFor:'documentation'! |
28 |
28 |
29 copyright |
29 copyright |
40 " |
40 " |
41 ! |
41 ! |
42 |
42 |
43 version |
43 version |
44 " |
44 " |
45 $Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.20 1995-02-26 18:20:45 claus Exp $ |
45 $Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.21 1995-02-28 21:01:58 claus Exp $ |
46 " |
46 " |
47 ! |
47 ! |
48 |
48 |
49 documentation |
49 documentation |
50 " |
50 " |
692 aStream nextPut:#minus1. |
692 aStream nextPut:#minus1. |
693 aStream nextPut:lineNr. |
693 aStream nextPut:lineNr. |
694 aStream nextPut:#jump. |
694 aStream nextPut:#jump. |
695 aStream nextPut:pos. |
695 aStream nextPut:pos. |
696 |
696 |
697 (aStream contents) at:pos2 put:(aStream position) |
697 (aStream contents) at:pos2 put:(aStream position). |
698 aStream nextPut:#drop. |
698 aStream nextPut:#drop. |
699 ! |
699 ! |
700 |
700 |
701 codeIfElseOn:aStream inBlock:b valueNeeded:valueNeeded |
701 codeIfElseOn:aStream inBlock:b valueNeeded:valueNeeded |
702 "generate code for x ifxxx:[ ... ] yyy:[ ...]" |
702 "generate code for x ifxxx:[ ... ] yyy:[ ...]" |