Is this expected?<br><br><br><br>CL-USER> (ql:quickload "parenscript")<br>...<br>CL-USER> (defpackage :ps-user (:use :cl :ps))<br>#<The PS-USER package, 0/16 internal, 0/16 external><br><br>CL-USER> (in-package "PS-USER")<br>
#<The PS-USER package, 0/16 internal, 0/16 external><br><br>PS-USER> (ps (let ((s-a))))<br>"(function () {<br><br> var sA = null;<br><br> return null;<br><br>})();"<br><br><br><br>Also,<br><br>$ cat foo.lisp<br>
(let ((s-a))<br> (+ s-a 42)<br> (chain s-a (append-child foo)))<br><br><br>PS-USER> (ps-compile-file "foo.lisp")<br>
"(function () {<br>
<br>
var sA = null;<br>
<br>
sA + 42;<br>
<br>
return sA.appendChild(foo);<br>
<br>
})();<br>
<br>
"<br>
<br>
PS-USER> <br>
<br>
<br>Which is against documentation "<span style="color:rgb(0,0,0);font-family:'Times New Roman';font-size:medium;font-style:normal;font-variant:normal;font-weight:normal;letter-spacing:normal;line-height:normal;text-align:-webkit-auto;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px;display:inline!important;float:none">Top-level<span class="Apple-converted-space"> </span></span><code style="color:rgb(0,0,0);font-style:normal;font-variant:normal;font-weight:normal;letter-spacing:normal;line-height:normal;text-align:-webkit-auto;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px">LET</code><span style="color:rgb(0,0,0);font-family:'Times New Roman';font-size:medium;font-style:normal;font-variant:normal;font-weight:normal;letter-spacing:normal;line-height:normal;text-align:-webkit-auto;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px;display:inline!important;float:none"><span class="Apple-converted-space"> </span>and<span class="Apple-converted-space"> </span></span><code style="color:rgb(0,0,0);font-style:normal;font-variant:normal;font-weight:normal;letter-spacing:normal;line-height:normal;text-align:-webkit-auto;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px">LET*</code><span style="color:rgb(0,0,0);font-family:'Times New Roman';font-size:medium;font-style:normal;font-variant:normal;font-weight:normal;letter-spacing:normal;line-height:normal;text-align:-webkit-auto;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px;display:inline!important;float:none"><span class="Apple-converted-space"> </span>forms will create new global variables, or overwrite the values of already existing global variables with the same name."<br>
<br>Please comment<br></span>