hg/stx-goodies-petitparser: comparison compiler/extensions.st

equal deleted inserted replaced

-:548996aca274
+:fb212e14d1f4
 "Modified: / 24-08-2015 / 23:39:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 !PPParser methodsFor:'*petitcompiler'!
-compile: options
+compile:options
-| configuration |
+| compiler |
-self assert: (options isKindOf: PPCCompilationOptions).
+self assert:(options isKindOf:PPCCompilationOptions).
+compiler := PPCCompiler default.
-configuration := PPCConfiguration default.
+compiler context options:options.
-configuration context options: options.
+^ compiler compile:self
-^ configuration compile: self
 "Modified: / 28-08-2015 / 14:25:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 !PPParser methodsFor:'*petitcompiler'!
 ! !
 !PPParser methodsFor:'*petitcompiler'!
 compileTokenizing
-| configuration |
+| compiler |
-configuration := PPCConfiguration tokenizing.
-^ self compileWithConfiguration: configuration
+compiler := PPCCompiler tokenizing.
-! !
+^ self compileUsingCompiler: compiler
+! !
-!PPParser methodsFor:'*petitcompiler'!
+!PPParser methodsFor:'*petitcompiler'!
-compileWithConfiguration: configuration
-^ configuration compile: self
+compileUsingCompiler:aPPCCompiler
+^ aPPCCompiler compile:self
 ! !
 !PPParser methodsFor:'*petitcompiler'!
 firstSetSuchThat: block