April 2011 - parenscript-devel - mailman3.common-lisp.net

Re: [parenscript-devel] what's wrong?
by F D 12 Dec '11

12 Dec '11

Yes it helps. Many Thanks, I made a mistake and forgot to use a (lambda...) Is there something that can help to convert js code to parenscript code? FD

3 3

[parenscript-devel] Possible bug in Parenscript 2.3 (*ps-lisp-library*)
by TeMPOraL 19 Jun '11

19 Jun '11

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.

2 3

[parenscript-devel] macro
by Haris Bogdanovich 26 Apr '11

26 Apr '11

Hi. How to define a macro to give me this code: (defun xhr-func () (setf (@ xhr onreadystatechange) (lambda () (if (= (@ xhr ready-state) 4) (progn (setf ime (@ xhr response-text)) (alert ime))) 0)) (chain xhr (open "GET" "/value.lisp" true)) (chain xhr (send null))) I tried: (defmacro xhr-macro () `(defun xhr-func () (setf (@ xhr onreadystatechange) (lambda () (if (= (@ xhr ready-state) 4) (progn (setf ime (@ xhr response-text)) (alert ime))) 0)) (chain xhr (open "GET" "/value.lisp" true)) (chain xhr (send null)))) Lispworks inserts lots of its code when trying macroexpand so it doesn't work. I would latter give arguments to the macro, ofcourse. What are defmacro/ps and defmacro+ps for ? Thanks

3 2

[parenscript-devel] XMLHttpRequest
by Haris 17 Apr '11

17 Apr '11

Hi. How to make a XMLHttpRequest object to contact the Hunchentoot server ? Thanks

2 2

[parenscript-devel] XMLHttpRequest
by Haris 14 Apr '11

14 Apr '11

Hi. How to make a XMLHttpRequest object to contact the Hunchentoot server ? Thanks

4 4