gcl broken in current git



On Tue, 2013-02-19 at 16:07 +0000, Rupert Swarbrick wrote:
   . . .
> Dan replied to me off-list pointing out that adding the following two
> lines fixed the problem:
> 
>   ;; GCL needs to know that compsplt and compsplt-eq return multiple values
>   #+gcl
>   (declaim (ftype (function (t) t t) compsplt compsplt-eq))
> 
> I'll push a patch with this in a second as a stop-gap, but I've
> obviously misunderstood something about the lisp compile/load/eval cycle
> so I'll try and work out how to do this properly and push a less hacky
> fix soon.

I guess my ignorance is showing because I thought the Hyperspec said
that it should be

    (declaim (ftype (function (t) (values t t)) compsplt compsplt-eq))

Isn't the VALUES form required?

-- 
Bill Wood