From: Nikodemus S. <nik...@ra...> - 2011-10-30 10:15:02
|
On 22 September 2011 12:47, james anderson <jam...@se...> wrote: > i attach one below, with the proviso, that it does little to indicate > the operation of the type predicates. Thanks. Getting back on this... > 5: (ERROR > SIMPLE-TYPE-ERROR > :DATUM > #<AMQP-1-1-0-9-1:CHANNEL [#<PURI:URI amqp://hetzner.dydra.com/ > >].1 {100AFAD8B1}> > :EXPECTED-TYPE > AMQP:CHANNEL > :FORMAT-CONTROL > "SHARED-INITIALIZE: the CHANNEL argument (~s) must be of type > AMQP:CHANNEL." > :FORMAT-ARGUMENTS > (#<AMQP-1-1-0-9-1:CHANNEL [#<PURI:URI amqp://hetzner.dydra.com/ > >].1 {100AFAD8B1}>)) I presume your SHARED-INITIALIZE has something like (unless (typep x 'channel) (error ...)) in it. Can you send the exact source for the method in question -- or at least the parts up to this point. Results of (describe 'channel) could be of interest as well. Cheers, -- nikodemus |