Source offsets were not used in cmpdefs.lsp

This commit is contained in:
Juan Jose Garcia Ripoll 2010-03-04 20:39:32 +01:00
parent 957dd894bd
commit 87f60d3db1

View file

@ -191,7 +191,7 @@
(debug 0) ;;; Debug quality
(file (car ext:*source-location*))
;;; Source file or NIL
(file-position *compile-file-position*)
(file-position (or (cdr ext:*source-location*) *compile-file-position*))
;;; Top-level form number in source file
)