[Axiom-developer] SPECIALCASESYNTAX

[Gabriel Dos Reis]

Tim --

  Speaking of meta meta and friends, the SBCL compiler chokes on the
following from newaux.lips


   (defun SPECIALCASESYNTAX () (OR (AND (char= TOK '#\#) (DIGITP CHR))))

   (defun TERMINATOR (CHR)
     (member CHR '(#\  #\( #\) #\. #\; #\, #\Return)) :test #'char=)


The problem is that the routine SPECIALCASESYNTAX references two
undefined variables, namely TOK and CHR.   I don't know how that function
can possibly work.  In fact, that routine does not appear to be called
anywhere...

-- Gaby