adding exit()

MoeOrganization · Apr 3, 2013 · 55b92f5 · 55b92f5
1 parent 2f93a5b
commit 55b92f5
Showing 1 changed file with 17 additions and 0 deletions.
diff --git a/src/main/scala/org/moe/runtime/builtins/CorePackage.scala b/src/main/scala/org/moe/runtime/builtins/CorePackage.scala
@@ -50,5 +50,22 @@ object CorePackage {
       )
     )
 
+    pkg.addSubroutine(
+      new MoeSubroutine(
+        "exit",
+        new MoeSignature(List(new MoeOptionalParameter("$status"))),
+        env,
+        { (e) => 
+            val status = e.get("$status").get
+            if (status.isUndef) {
+              r.getSystem.exit()
+            } else {
+              r.getSystem.exit(status.unboxToInt.get)
+            }
+            getUndef
+        }
+      )
+    )
+
   }
 }