[parenscript-devel] problem with identifier letter case
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; };"
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@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@common-lisp.net http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
When put the two in a file, they really both get lower case when compile INSIDE CL-USER repl, while both get upper case when compile inside parenscript repl. On Wed, Mar 21, 2012 at 1:03 AM, Vladimir Sedach <vsedach@gmail.com> wrote:
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@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@common-lisp.net http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
_______________________________________________ parenscript-devel mailing list parenscript-devel@common-lisp.net http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
That makes sense, since LOAD uses the current *readtable* On Tue, Mar 20, 2012 at 9:11 PM, Canhua <dreameration@gmail.com> wrote:
When put the two in a file, they really both get lower case when compile INSIDE CL-USER repl, while both get upper case when compile inside parenscript repl.
On Wed, Mar 21, 2012 at 1:03 AM, Vladimir Sedach <vsedach@gmail.com> wrote:
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@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@common-lisp.net http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
_______________________________________________ parenscript-devel mailing list parenscript-devel@common-lisp.net http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
_______________________________________________ parenscript-devel mailing list parenscript-devel@common-lisp.net http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
participants (2)
-
Canhua -
Vladimir Sedach