--- a/compiler/tests/PPCOverlappingTokensTest.st	Mon Aug 24 22:32:15 2015 +0100
+++ b/compiler/tests/PPCOverlappingTokensTest.st	Mon Aug 24 23:42:53 2015 +0100
@@ -3,8 +3,8 @@
 "{ NameSpace: Smalltalk }"
 
 PPAbstractParserTest subclass:#PPCOverlappingTokensTest
-	instanceVariableNames:'parser result context node arguments configuration fooToken
-		idToken keywordToken p unaryToken assignmentToken'
+	instanceVariableNames:'parser result context node options configuration fooToken idToken
+		keywordToken p unaryToken assignmentToken'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'PetitCompiler-Tests-Core-Tokenizing'
@@ -22,12 +22,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
     ].
@@ -42,12 +42,12 @@
 !
 
 setUp
-    arguments := PPCArguments default
+    options := PPCCompilationOptions default
         profile: true;
         yourself.
         
     configuration := PPCTokenizingConfiguration new
-        arguments: arguments;
+        options: options;
         yourself.
         
     self cleanClass.
@@ -56,7 +56,9 @@
     idToken := (#word asParser plus) token trim name: 'id'; yourself.
     unaryToken := (#word asParser plus, $: asParser not) token trim name: 'unary'; yourself.
     keywordToken := (#word asParser plus, $: asParser) token trim name: 'kw'; yourself.
-    assignmentToken := (':=' asParser) token trim name: 'assignment'; yourself.	
+    assignmentToken := (':=' asParser) token trim name: 'assignment'; yourself.
+
+    "Modified: / 24-08-2015 / 23:40:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 tearDown