summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--share/txr/stdlib/debugger.tl2
1 files changed, 1 insertions, 1 deletions
diff --git a/share/txr/stdlib/debugger.tl b/share/txr/stdlib/debugger.tl
index 9cd52b61..8eeb9ce2 100644
--- a/share/txr/stdlib/debugger.tl
+++ b/share/txr/stdlib/debugger.tl
@@ -51,7 +51,7 @@
(args fr.args)
(name (if (functionp fun)
(func-get-name fun)))
- (loc nx-fr.(loc))
+ (loc (if nx-fr nx-fr.(loc)))
(kind
(cond
((interp-fun-p fun) "I")