equal
deleted
inserted
replaced
1 " |
1 " |
2 COPYRIGHT (c) 1989 by Claus Gittinger |
2 COPYRIGHT (c) 1989 by Claus Gittinger |
3 All Rights Reserved |
3 All Rights Reserved |
4 |
4 |
5 This software is furnished under a license and may be used |
5 This software is furnished under a license and may be used |
6 only in accordance with the terms of that license and with the |
6 only in accordance with the terms of that license and with the |
7 inclusion of the above copyright notice. This software may not |
7 inclusion of the above copyright notice. This software may not |
8 be provided or otherwise made available to, or used by, any |
8 be provided or otherwise made available to, or used by, any |
17 category:'System-Compiler-Support' |
17 category:'System-Compiler-Support' |
18 ! |
18 ! |
19 |
19 |
20 PrimaryNode comment:' |
20 PrimaryNode 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/PrimaryNode.st,v 1.10 1995-08-11 16:03:45 claus Exp $ |
24 $Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.11 1995-08-11 20:28:17 claus Exp $ |
25 '! |
25 '! |
26 |
26 |
27 !PrimaryNode class methodsFor:'documentation'! |
27 !PrimaryNode class methodsFor:'documentation'! |
28 |
28 |
29 copyright |
29 copyright |
30 " |
30 " |
31 COPYRIGHT (c) 1989 by Claus Gittinger |
31 COPYRIGHT (c) 1989 by Claus Gittinger |
32 All Rights Reserved |
32 All Rights Reserved |
33 |
33 |
34 This software is furnished under a license and may be used |
34 This software is furnished under a license and may be used |
35 only in accordance with the terms of that license and with the |
35 only in accordance with the terms of that license and with the |
36 inclusion of the above copyright notice. This software may not |
36 inclusion of the above copyright notice. This software may not |
37 be provided or otherwise made available to, or used by, any |
37 be provided or otherwise made available to, or used by, any |
40 " |
40 " |
41 ! |
41 ! |
42 |
42 |
43 version |
43 version |
44 " |
44 " |
45 $Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.10 1995-08-11 16:03:45 claus Exp $ |
45 $Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.11 1995-08-11 20:28:17 claus Exp $ |
46 " |
46 " |
47 ! |
47 ! |
48 |
48 |
49 documentation |
49 documentation |
50 " |
50 " |
76 ^ self subclassResponsibility |
76 ^ self subclassResponsibility |
77 ! ! |
77 ! ! |
78 |
78 |
79 !PrimaryNode methodsFor:'code generation'! |
79 !PrimaryNode methodsFor:'code generation'! |
80 |
80 |
81 codeForSideEffectOn:aStream inBlock:b |
81 codeForSideEffectOn:aStream inBlock:b for:aCompiler |
82 "no code at all" |
82 "no code at all" |
83 ^ self |
83 ^ self |
84 ! |
84 ! |
85 |
85 |
86 codeOn:aStream inBlock:codeBlock |
86 codeOn:aStream inBlock:codeBlock for:aCompiler |
87 ^ self subclassResponsibility |
87 ^ self subclassResponsibility |
88 ! |
88 ! |
89 |
89 |
90 codeStoreOn:aStream inBlock:codeBlock valueNeeded:valueNeeded |
90 codeStoreOn:aStream inBlock:codeBlock valueNeeded:valueNeeded for:aCompiler |
91 ^ self subclassResponsibility |
91 ^ self subclassResponsibility |
92 ! ! |
92 ! ! |
93 |
93 |
94 !PrimaryNode methodsFor:'printing'! |
94 !PrimaryNode methodsFor:'printing'! |
95 |
95 |