bad source locations

[3b]

in sbcl 1.2.3.41 x8664 linux, 1.1.13.24 x86 linux:

* (defun x () (declare (optimize debug))'(wrong) (error "x"))
* (x)
debugger invoked on a SIMPLE-ERROR in thread
...
(X)
   source: (WRONG)

source should be the (ERROR "X") form, not the '(WRONG) form

[Douglas Katzman (dougk)]

I wonder if this is what the code alluded to in https://groups.google.com/forum/#!searchin/sbcl-devel/$20sb-cover/sbcl-devel/BMhG2FvZssE/j-UbhVko-FIJ was meant to fix ? [The typetran change that I reverted to unbreak sb-cover]

[Stas Boukarev (stassats)]

In 1b4651b6d83628c130f0d7e8f8e2016cac680b08.