compiler/PPCBridge.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Wed, 26 Aug 2015 23:34:48 +0100
changeset 533 666372dbe307
parent 452 9f4558b3be66
permissions -rw-r--r--
PPCConfiguration refactoring: [5/10]: Commented options in PPCCompilationOptions. So it's more clear for what the option is and how to use it. This is a base for user-documentation as options are meant to be set by the end user.

"{ Package: 'stx:goodies/petitparser/compiler' }"

"{ NameSpace: Smalltalk }"

PPParser subclass:#PPCBridge
	instanceVariableNames:'selector'
	classVariableNames:''
	poolDictionaries:''
	category:'PetitCompiler-Core'
!

!PPCBridge class methodsFor:'as yet unclassified'!

on: aSymbol
    ^ self new
        selector: aSymbol;
        yourself
! !

!PPCBridge methodsFor:'as yet unclassified'!

call
    ^ 'self callParser: ', self id, '.'.
!

selector: aSymbol
    selector := aSymbol
! !

!PPCBridge methodsFor:'parsing'!

parseOn: aPPContext
    | retval |
    retval := (aPPContext compiledParser) perform: selector.
    (aPPContext compiledParser isError) ifTrue: [ 
        aPPContext compiledParser clearError.		
        ^ PPFailure message: 'error' context: aPPContext 
    ].
    ^ retval
! !