diff --git a/src/lsp/trace.lsp b/src/lsp/trace.lsp
index 1b330ffea..09bfaf709 100644
--- a/src/lsp/trace.lsp
+++ b/src/lsp/trace.lsp
@@ -181,7 +181,8 @@ all functions."
           (format *trace-output*
                   "~0,4@T\\\\ ~{ ~S~}~%"
                   extras))
-        *trace-output*))))
+        *trace-output*)
+      *trace-output*)))
 
 (defun trace-record (fname)
   (declare (si::c-local))