diff -r ebfddc82b8bb -r 439c4057517f compiler/tests/PPCTokenizingCodeGeneratorTest.st --- a/compiler/tests/PPCTokenizingCodeGeneratorTest.st Mon Aug 24 22:32:15 2015 +0100 +++ b/compiler/tests/PPCTokenizingCodeGeneratorTest.st Mon Aug 24 23:42:53 2015 +0100 @@ -3,7 +3,7 @@ "{ NameSpace: Smalltalk }" PPAbstractParserTest subclass:#PPCTokenizingCodeGeneratorTest - instanceVariableNames:'visitor node result compiler parser context arguments tokenizer + instanceVariableNames:'visitor node result compiler parser context options tokenizer whitespace configuration' classVariableNames:'' poolDictionaries:'' @@ -14,12 +14,12 @@ cleanClass | parserClass scannerClass | - parserClass := (Smalltalk at: arguments parserName ifAbsent: [nil]). + parserClass := (Smalltalk at: options parserName ifAbsent: [nil]). parserClass notNil ifTrue:[ parserClass removeFromSystem ]. - scannerClass := (Smalltalk at: arguments scannerName ifAbsent: [nil]). + scannerClass := (Smalltalk at: options scannerName ifAbsent: [nil]). scannerClass notNil ifTrue:[ scannerClass removeFromSystem ]. @@ -35,9 +35,9 @@ ! setUp - arguments := PPCArguments default + options := PPCCompilationOptions default profile: true; - yourself. + yourself. self cleanClass. @@ -47,12 +47,14 @@ _self unmarkConsumeTokensForInline. _self createFSAs. _self buildScannerTokens. - _self buildScannerScans. + _self buildScannerScans. _self generateScanner. _self generateParser. ] base: PPCConfiguration tokenizing. - configuration arguments: arguments. + configuration options: options. + + "Modified: / 24-08-2015 / 23:40:08 / Jan Vrany " ! tearDown