[Kawa-commonlisp-dev] Internal symbol representation

[Charles Turner]

I have some code that parses (declare (type integer fnord))
I check to see if the I'm processing it using

(case name
  ((declare) ...)
  ...)

however, name is internally represented as {COMMON-LISP}:DECLARE, so
that match fails. I've gone to all the lengths I think of to change
that, including modiying Symbols' toString and DisplayFormat

So,

#|kawa:589|# '(declare (type integer fnard))
(DECLARE (TYPE integer FNARD))
#|kawa:590|# (invoke 'cl:car '|toString|)
COMMON-LISP:CAR
#|kawa:591|# 'cl:car
CAR

so where do you guys think this might be happening?

Thanks,
Charles.