equal
deleted
inserted
replaced
21 ifTrue: [ node statements first ] |
21 ifTrue: [ node statements first ] |
22 ifFalse: [ node ] ] |
22 ifFalse: [ node ] ] |
23 ! |
23 ! |
24 |
24 |
25 startMethod |
25 startMethod |
26 "Make sure the method node has the source code properly set." |
26 "Make sure the method node has the source code properly set." |
27 |
27 |
28 ^ ([ :stream | stream collection ] asParser and , super startMethod) |
28 ^ ([ :stream | stream collection ] asParser and , super startMethod) |
29 map: [ :source :node | ] |
29 map: [ :source :node | node source: source ] |
30 |
|
31 "Modified: / 16-05-2015 / 09:47:58 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
32 ! ! |
30 ! ! |
33 |
31 |
34 !PPCSmalltalkNoopParser methodsFor:'grammar'! |
32 !PPCSmalltalkNoopParser methodsFor:'grammar'! |
35 |
33 |
36 array |
34 array |