--- a/compiler/PPCArguments.st	Thu May 21 14:12:22 2015 +0100
+++ b/compiler/PPCArguments.st	Fri Jul 24 15:06:54 2015 +0100
@@ -87,12 +87,12 @@
     self set: #merge to: value.
 !
 
-name
-    ^ self at: #name ifAbsent: #PPGeneratedParser 
+parserName
+    ^ self at: #parserName ifAbsent: #PPGeneratedParser 
 !
 
-name: value
-    self set: #name to: value.
+parserName: value
+    self set: #parserName to: value.
 !
 
 profile
@@ -111,6 +111,14 @@
     self set: #recognizingComponents to: value.
 !
 
+scannerName
+    ^ self at: #scannerName ifAbsent: #PPGeneratedScanner
+!
+
+scannerName: value
+    self set: #scannerName to: value.
+!
+
 specialize
     ^ self at: #specialize ifAbsent: true
 !