mirror of
git://git.code.sf.net/p/sbcl/sbcl
synced 2026-09-10 07:26:40 -04:00
a71c8bac47
* When CAST nodes detect definite type mismatch, they are replaced with debugging instrumentation to provide source locations at compile and run -time. When code is generated internally, the source can include literal internal data structures. Skip those when recovering source locations. * Fixes lp#943953 and a bunch of equally baffling duplicates.
4 lines
65 B
Common Lisp
4 lines
65 B
Common Lisp
(defun foo (&optional count)
|
|
(declare (fixnum count))
|
|
count)
|