diff options
-rw-r--r-- | share/txr/stdlib/debugger.tl | 2 |
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") |