I have also attached a patch for this one. Looking at the way RNG-ERROR was called elsewhere in this file, I think this should be correct.
Also, the other problem needs to be fixed too...
Chaitanya Gupta wrote:
Another warning while compiling the package --
; While compiling (:INTERNAL MAKE-RNG-LEXER 0): Warning: RNG-ERROR should be given at least 2 arguments. It was given 1 argument. Problem detected when processing (RNG-ERROR "too many colons") inside (WHEN (FIND #: LNAME) (RNG-ERROR "too many colons")) inside (LET* ((POS #) (PREFIX #) (LNAME #)) (WHEN (FIND #: LNAME) (RNG-ERROR "too many colons")) ..)
The problem is in line 202 of compact.lisp.
Chaitanya
diff --git a/compact.lisp b/compact.lisp index 9dd4a40..c7f5557 100644 --- a/compact.lisp +++ b/compact.lisp @@ -199,7 +199,7 @@ (prefix (subseq cxml-clex:bag 0 pos)) (lname (subseq cxml-clex:bag (1+ pos )))) (when (find #: lname) - (rng-error "too many colons")) + (rng-error nil "too many colons")) (unless (and (nc-name-p prefix)) (rng-error nil "not an ncname: ~A" prefix)) (let ((ch (cxml-clex::getch)))