0.pre7.49:

[sbcl.git] / src / compiler / debug-dump.lisp

diff --git a/src/compiler/debug-dump.lisp b/src/compiler/debug-dump.lisp
index 043013f..3848eb2 100644 (file)
--- a/src/compiler/debug-dump.lisp
+++ b/src/compiler/debug-dump.lisp
@@ -250,10 +250,8 @@
               :created (file-info-write-date file-info)
               :compiled (source-info-start-time info)
               :source-root (file-info-source-root file-info)
-              :start-positions
-              (unless (eq *byte-compile* t)
-                (coerce-to-smallest-eltype
-                 (file-info-positions file-info)))))
+              :start-positions (coerce-to-smallest-eltype
+                                (file-info-positions file-info))))
         (name (file-info-name file-info)))
     (etypecase name
       ((member :lisp)