[parenscript-devel] problem with identifier letter case

[Vladimir Sedach]

Are you using SLIME? It seems to switch out the readtable based on the
package you are in, so:

CL-USER> (readtable-case *readtable*)
:UPCASE

PS> (readtable-case *readtable*)
:invert

I hadn't noticed this before. If you put the two in a file like:

(in-package #:cl-user)

(princ (ps:ps (+ 1 A)))

(in-package #:parenscript)

(princ (ps:ps (+ 1 A)))

They both come out as 1+a;

Vladimir

On Sun, Mar 18, 2012 at 8:49 AM, Canhua <dreameration at gmail.com> wrote:
> hi, as shown below, function name with upper case letter is compiled
> into lower case name outside parenscript package,
> while in parenscript package, the name's case is preserved.
>
> Why?
>
> cl-user> (in-package  :cl-user)
>
> #<package "COMMON-LISP-USER">
>
> cl-user> (ps:ps (defun A ()))
>
> "function a() {       ;; upper case compiled into lower case
>    return null;
> };"
>
> cl-user> (in-package :ps)
>
> #<PACKAGE "PARENSCRIPT">
>
> PS> (ps:ps (defun A ()))
>
> "function A() {        ;; upper case is preserved
>    return null;
> };"
>
> _______________________________________________
> parenscript-devel mailing list
> parenscript-devel at common-lisp.net
> http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel