1 files changed, 2 insertions, 0 deletions
diff --git a/lisplib.c b/lisplib.c
index 9d708a1c..cbe2de5d 100644
--- a/lisplib.c
+++ b/lisplib.c
@@ -44,6 +44,7 @@
 
 val dl_table;
 int opt_dbg_autoload;
+val trace_loaded;
 
 void set_dlt_entries(val dlt, val *name, val fun)
 {
@@ -392,6 +393,7 @@ static val trace_instantiate(val set_fun)
 {
   funcall1(set_fun, nil);
   load(format(nil, lit("~atrace.tl"), stdlib_path, nao));
+  trace_loaded = t;
   return nil;
 }