equal
deleted
inserted
replaced
14 |
14 |
15 cByteSize |
15 cByteSize |
16 "superclass Cface::CTypeNode says that I am responsible to implement this method" |
16 "superclass Cface::CTypeNode says that I am responsible to implement this method" |
17 |
17 |
18 ^ self shouldImplement |
18 ^ self shouldImplement |
|
19 ! |
|
20 |
|
21 ffiPointerTypeSymbol |
|
22 |
|
23 ^ (self ffiTypeSymbol , 'Pointer') asSymbol |
|
24 |
|
25 "Created: / 18-07-2011 / 16:40:04 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
19 ! |
26 ! |
20 |
27 |
21 ffiTypeSymbol |
28 ffiTypeSymbol |
22 "superclass Cface::CTypeNode says that I am responsible to implement this method" |
29 "superclass Cface::CTypeNode says that I am responsible to implement this method" |
23 |
30 |
36 ^self shouldNotImplement |
43 ^self shouldNotImplement |
37 |
44 |
38 "Created: / 12-02-2008 / 22:05:16 / janfrog" |
45 "Created: / 12-02-2008 / 22:05:16 / janfrog" |
39 ! ! |
46 ! ! |
40 |
47 |
|
48 !CBuiltinNode methodsFor:'printing'! |
|
49 |
|
50 printOn: stream indent: level |
|
51 |
|
52 stream next: level put: Character tab. |
|
53 stream nextPutAll: self ffiTypeSymbol. |
|
54 |
|
55 "Created: / 18-07-2011 / 16:51:21 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
56 ! ! |
|
57 |
41 !CBuiltinNode methodsFor:'visiting'! |
58 !CBuiltinNode methodsFor:'visiting'! |
42 |
59 |
43 acceptVisitor:aVisitor |
60 acceptVisitor:aVisitor |
44 "Double dispatch back to the visitor, passing my type encoded in |
61 "Double dispatch back to the visitor, passing my type encoded in |
45 the selector (visitor pattern)" |
62 the selector (visitor pattern)" |