Opened 9 years ago

Closed 9 years ago

#850 closed defect (fixed)

mis-attributed source location

Reported by: gz Owned by: gz
Priority: normal Milestone:
Component: Compiler Version: trunk
Keywords: Cc:

Description

Compile and load this file:

(let ()
  (defun foo () t))

(defun bar () t)

Then:

? (function-source-note #'foo) 
#<SOURCE-NOTE "ccl:test.lisp":30-46 "(defun bar () t)"> 

Change History (1)

comment:1 Changed 9 years ago by gz

  • Resolution set to fixed
  • Status changed from new to closed

(In [14718]) Compile toplevel forms before changing *fcomp-loading-toplevel-location*. Fixes ticket:850

Note: See TracTickets for help on using tickets.