compiler/PPCCompilationContext.st
changeset 538 16e8536f5cfb
parent 537 fb212e14d1f4
--- a/compiler/PPCCompilationContext.st	Mon Sep 07 08:20:46 2015 +0100
+++ b/compiler/PPCCompilationContext.st	Mon Sep 07 11:53:38 2015 +0100
@@ -29,8 +29,19 @@
     ^ options
 !
 
-options:aPPCCompilationOptions
-    options := aPPCCompilationOptions.
+options:optionsOrOptionArray
+    "Set options used for compilation. 
+     `optionsOrOptionArray` may be either an instance of
+     PPCCompilationOptions or and array specifing options.
+     See PPCCompilationOptions class>>from: for details."
+
+    optionsOrOptionArray isSequenceable ifTrue:[ 
+        options := PPCCompilationOptions from: optionsOrOptionArray
+    ] ifFalse:[
+        options := optionsOrOptionArray.
+    ]
+
+    "Modified: / 07-09-2015 / 10:42:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 parserClass
@@ -64,8 +75,8 @@
 initialize
     "Invoked when a new instance is created."
 
-    options := PPCCompilationOptions default.
+    options := PPCCompilationOptions new.
 
-    "Modified: / 26-08-2015 / 19:49:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 07-09-2015 / 10:22:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !