From 35cfed265b313d645c850f1ed24f6e8f937a410c Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Sat, 27 Jun 2009 10:30:51 -0400
Subject: -debug from the command line

---
 src/compiler.sml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/compiler.sml')

diff --git a/src/compiler.sml b/src/compiler.sml
index 6126a1a2..2a53bf08 100644
--- a/src/compiler.sml
+++ b/src/compiler.sml
@@ -333,7 +333,7 @@ fun parseUrp' fname =
                 val database = ref NONE
                 val exe = ref NONE
                 val sql = ref NONE
-                val debug = ref false
+                val debug = ref (Settings.getDebug ())
                 val profile = ref false
                 val timeout = ref NONE
                 val ffi = ref []
-- 
cgit v1.2.3