[parenscript-devel] Possible bug in Parenscript 2.3 (*ps-lisp-library*)

[TeMPOraL]

Hi,

I am working on CCL and I have migrated from Parenscript 2.2 to 2.3,
and now I get warnings (pasted below) when including Parenscript
runtime library (*ps-lisp-library*). Generated Javascript has bugs; in
particular, 'member' function always returns false.

WARNING:

CL-USER> (parenscript:ps* parenscript:*ps-lisp-library*)
; Warning: Returning from unknown block nilBlock
; While executing: PARENSCRIPT::RETURN-EXP, in process repl-thread(9).
; Warning: Returning from unknown block nilBlock
; While executing: PARENSCRIPT::RETURN-EXP, in process repl-thread(9).
; Warning: Returning from unknown block nilBlock
; While executing: PARENSCRIPT::RETURN-EXP, in process repl-thread(9).
; Warning: Returning from unknown block nilBlock
; While executing: PARENSCRIPT::RETURN-EXP, in process repl-thread(9).
; Warning: Trying to (RETURN TRUE) from inside a loop with an implicit
nil block (DO, DOLIST, DOTIMES, etc.). Parenscript doesn't support
returning values this way from inside a loop yet!
; While executing: #<Anonymous Function #x9D6C98E>, in process repl-thread(9).
; Warning: Returning from unknown block nilBlock
; While executing: PARENSCRIPT::RETURN-EXP, in process repl-thread(9).
; Warning: Returning from unknown block nilBlock
; While executing: PARENSCRIPT::RETURN-EXP, in process repl-thread(9).
; Warning: Returning from unknown block nilBlock
; While executing: PARENSCRIPT::RETURN-EXP, in process repl-thread(9).

Result:
(...)
/** Check if ITEM is a member of ARR. */
function member(item, arr) {
    for (var el = null, _js_idx176 = 0; _js_idx176 < arr.length;
_js_idx176 += 1) {
        el = arr[_js_idx176];
        if (el === item) {
            break;
        };
    };
    return false;
};
(...)

Regards,
-- 
Jacek Złydach,
http://temporal.pr0.pl/devblog
TRC - Bringing you tomorrow's solutions yesterday.