equal
deleted
inserted
replaced
240 |
240 |
241 self hasFiniteLanguage ifTrue: [ |
241 self hasFiniteLanguage ifTrue: [ |
242 finite := self. |
242 finite := self. |
243 infinite := anotherNode. |
243 infinite := anotherNode. |
244 ] ifFalse: [ |
244 ] ifFalse: [ |
245 finite := anotherNode. |
245 finite := anotherNode. |
246 infinite := self. |
246 infinite := self. |
247 ]. |
247 ]. |
248 |
248 |
249 finite recognizedSentences do: [ :sentence | |
249 finite recognizedSentences do: [ :sentence | |
250 (infinite parser matches: sentence) ifTrue: [ ^ true ]. |
250 (infinite parser matches: sentence) ifTrue: [ ^ true ]. |
523 "Modified: / 22-05-2015 / 15:34:50 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
523 "Modified: / 22-05-2015 / 15:34:50 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
524 ! ! |
524 ! ! |
525 |
525 |
526 !PPCNode methodsFor:'testing'! |
526 !PPCNode methodsFor:'testing'! |
527 |
527 |
|
528 canHavePPCId |
|
529 ^ true |
|
530 ! |
|
531 |
528 isMarkedForInline |
532 isMarkedForInline |
529 ^ self propertyAt: #inlined ifAbsent: [ false ]. |
533 ^ self propertyAt: #inlined ifAbsent: [ false ]. |
530 |
534 |
531 "Created: / 23-04-2015 / 15:40:10 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
535 "Created: / 23-04-2015 / 15:40:10 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
532 ! |
536 ! |
547 |
551 |
548 !PPCNode methodsFor:'transformation'! |
552 !PPCNode methodsFor:'transformation'! |
549 |
553 |
550 asCompilerNode |
554 asCompilerNode |
551 ^ self |
555 ^ self |
|
556 ! |
|
557 |
|
558 asFsa |
|
559 | visitor | |
|
560 visitor := PEGFsaGenerator new. |
|
561 ^ visitor visit: self |
552 ! |
562 ! |
553 |
563 |
554 replace: node with: anotherNode |
564 replace: node with: anotherNode |
555 ! |
565 ! |
556 |
566 |