diff options
Diffstat (limited to 'module/system/vm/trace.scm')
-rw-r--r-- | module/system/vm/trace.scm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/module/system/vm/trace.scm b/module/system/vm/trace.scm index 7657be4e1..717013fc7 100644 --- a/module/system/vm/trace.scm +++ b/module/system/vm/trace.scm @@ -50,8 +50,7 @@ (frame-call-representation frame)))) (define* (print-return frame depth width prefix max-indent values) - (let* ((len (frame-num-locals frame)) - (prefix (build-prefix prefix depth "| " "~d< "max-indent))) + (let ((prefix (build-prefix prefix depth "| " "~d< "max-indent))) (case (length values) ((0) (format (current-error-port) "~ano values\n" prefix)) |