add this option everywhere

brownplt · Oct 4, 2016 · af47f63 · af47f63
1 parent cb8e5bd
commit af47f63
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 2 deletions.
diff --git a/src/arr/compiler/compile-lib.arr b/src/arr/compiler/compile-lib.arr
@@ -467,7 +467,7 @@ fun compile-and-run-locator(locator, finder, context, realm, runtime, starter-mo
       #print("Run program\n")
 
       # NOTE(joe): program.v OK because no errors above
-      ans = right(L.run-program(runtime, realm, program.v.js-ast.to-ugly-source()))
+      ans = right(L.run-program(runtime, realm, program.v.js-ast.to-ugly-source(), options))
       #print("Done\n")
       ans
     | link(_, _) =>

diff --git a/src/arr/compiler/compile-structs.arr b/src/arr/compiler/compile-structs.arr
@@ -2046,6 +2046,7 @@ end
 
 type CompileOptions = {
   check-mode :: Boolean,
+  check-all :: Boolean,
   type-check :: Boolean,
   allow-shadowed :: Boolean,
   collect-all :: Boolean,
@@ -2061,6 +2062,7 @@ type CompileOptions = {
 
 default-compile-options = {
   check-mode : true,
+  check-all : true,
   type-check : false,
   allow-shadowed : false,
   collect-all: false,

diff --git a/src/arr/compiler/pyret.arr b/src/arr/compiler/pyret.arr
@@ -156,7 +156,8 @@ fun main(args):
           CLI.run(r.get-value("run"), CS.default-compile-options.{
               standalone-file: standalone-file,
               compile-module: true,
-              display-progress: display-progress
+              display-progress: display-progress,
+              check-all: check-all
             })
         else:
           print(C.usage-info(options).join-str("\n"))