equal
deleted
inserted
replaced
33 markForInline: node |
33 markForInline: node |
34 self canInline ifTrue: [ |
34 self canInline ifTrue: [ |
35 node markForInline. |
35 node markForInline. |
36 ]. |
36 ]. |
37 ^ node |
37 ^ node |
|
38 ! |
|
39 |
|
40 visitActionNode: node |
|
41 node child markForInline. |
|
42 ^ super visitActionNode: node. |
|
43 |
|
44 "Created: / 13-05-2015 / 16:25:16 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
38 ! |
45 ! |
39 |
46 |
40 visitCharSetPredicateNode: node |
47 visitCharSetPredicateNode: node |
41 ^ self markForInline: node |
48 ^ self markForInline: node |
42 ! |
49 ! |