--- a/compiler/PPCScannerCodeGenerator.st	Mon Aug 24 22:32:15 2015 +0100
+++ b/compiler/PPCScannerCodeGenerator.st	Mon Aug 24 23:42:53 2015 +0100
@@ -3,8 +3,7 @@
 "{ NameSpace: Smalltalk }"
 
 Object subclass:#PPCScannerCodeGenerator
-	instanceVariableNames:'codeGen fsa arguments incommingTransitions resultStrategy
-		fsaCache'
+	instanceVariableNames:'codeGen fsa options incommingTransitions resultStrategy fsaCache'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'PetitCompiler-Scanner'
@@ -20,21 +19,21 @@
 
 !PPCScannerCodeGenerator methodsFor:'accessing'!
 
-arguments
-    ^ arguments 
-!
-
-arguments: anObject
-    arguments := anObject.
-    codeGen arguments: anObject.
-!
-
 codeGen
     ^ codeGen 
 !
 
 compiler
     ^ self codeGen 
+!
+
+options
+    ^ options 
+!
+
+options: anObject
+    options := anObject.
+    codeGen options: anObject.
 ! !
 
 !PPCScannerCodeGenerator methodsFor:'analysis'!
@@ -410,8 +409,8 @@
     
     builder := PPCClassBuilder new.
     
-    builder compiledClassName: arguments scannerName.
-    builder compiledSuperclass: arguments scannerSuperclass.
+    builder compiledClassName: options scannerName.
+    builder compiledSuperclass: options scannerSuperclass.
     builder methodDictionary: codeGen clazz methodDictionary.
     builder constants: codeGen clazz constants.
 
@@ -424,7 +423,9 @@
     super initialize.
     
     codeGen := PPCFSACodeGen new.
-    arguments := PPCArguments default.
+    options := PPCCompilationOptions default.
     fsaCache := IdentityDictionary new.
+
+    "Modified: / 24-08-2015 / 23:39:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !