equal
deleted
inserted
replaced
4 |
4 |
5 PPCMethod subclass:#PPCInlinedMethod |
5 PPCMethod subclass:#PPCInlinedMethod |
6 instanceVariableNames:'' |
6 instanceVariableNames:'' |
7 classVariableNames:'' |
7 classVariableNames:'' |
8 poolDictionaries:'' |
8 poolDictionaries:'' |
9 category:'PetitCompiler-Core' |
9 category:'PetitCompiler-Compiler-Codegen' |
10 ! |
10 ! |
11 |
11 |
12 !PPCInlinedMethod methodsFor:'as yet unclassified'! |
12 !PPCInlinedMethod methodsFor:'as yet unclassified'! |
13 |
13 |
14 call |
14 call |
15 ^ self code |
15 ^ self code |
16 ! |
16 ! |
17 |
17 |
18 code |
18 code |
19 ^ buffer contents trimRight |
19 ^ (String streamContents:[:s | buffer codeOn:s ]) trimRight |
|
20 |
|
21 "Modified (format): / 01-06-2015 / 21:44:56 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
20 ! |
22 ! |
21 |
23 |
22 isInline |
24 isInline |
23 ^ true |
25 ^ true |
24 ! ! |
26 ! ! |
29 self error: 'return variable must be assigned by the non-inlined method....' |
31 self error: 'return variable must be assigned by the non-inlined method....' |
30 |
32 |
31 "Created: / 23-04-2015 / 21:06:12 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
33 "Created: / 23-04-2015 / 21:06:12 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
32 ! |
34 ! |
33 |
35 |
|
36 allocateReturnVariableNamed: name |
|
37 self error: 'return variable must be assigned by the non-inlined method....' |
|
38 |
|
39 "Created: / 15-06-2015 / 17:52:35 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
40 ! |
|
41 |
34 allocateTemporaryVariableNamed:aString |
42 allocateTemporaryVariableNamed:aString |
35 self error: 'sorry, I can''t allocate variables....' |
43 self error: 'sorry, I can''t allocate variables....' |
36 |
44 |
37 "Created: / 23-04-2015 / 21:06:12 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
45 "Created: / 23-04-2015 / 21:06:12 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
38 ! ! |
46 ! ! |