[Bese-devel] Error generating css with parenscript

[Vamsee Kanakala]

Hi all,

I don't know if this is the right place to ask parenscript questions, 
but I don't see a parenscript-specific list, so I'm posting it here. 
Sorry for the noob question.Trying out the examples, if I try this:

CL-USER> (require :parenscript)
NIL
CL-USER> (in-package :js)
#<PACKAGE "JS">
JS> (js
     (defun foobar (a b)
       (return (+ a b))))
"function foobar(a, b) {
  return a + b;
};"

Everything works correctly, with the javascript being printed out. But 
when I try this:

JS> (css (* :border "1px solid black")
      (div.bl0rg :font-family "serif")
      (("a:active" "a:hoover") :color "black" :size "200%"))
; in: LAMBDA NIL
;     ((:STYLE :TYPE "text/css") (:PRINC #\Newline "<!--" #\Newline)
;    (:PRINC (JS::CSS-RULE-TO-STRING (JS::CSS-RULE * :BORDER "1px solid 
black"))
;            (JS::CSS-RULE-TO-STRING
;             (JS::CSS-RULE JS::DIV.BL0RG :FONT-FAMILY "serif"))
;            (JS::CSS-RULE-TO-STRING
;             (JS::CSS-RULE ("a:active" "a:hoover")
;                           :COLOR
;                           "black"
;                           :SIZE
;                           "200%")))
;    (:PRINC "-->" #\Newline))
;
; caught ERROR:
;   illegal function call
;
; compilation unit finished
;   caught 1 ERROR condition
; Evaluation aborted

I get the above error. I'm not sure what is happening, can somebody 
point me in the right direction? I am using the latest code checked out 
from the repo.

Thanks,
Vamsee.