<div><div>Not sure where to post so add code here, sorry if i'm wrong with it.</div><div>Its error even with example from help</div><div> (princ "Hello world!")</div><div> (terpri)</div><div> (quit)</div>
<div> In my version:</div></div><div><div>(defun CP_2 (x y)</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>(MCP </div><div><span class="Apple-tab-span" style="white-space:pre"> </span>(MPL x) </div>
<div><span class="Apple-tab-span" style="white-space:pre"> </span>(MPL y)</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>)</div><div>)</div><div><br></div><div>(defun MPP(x)</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>;(MPL '(q (w (e)))) => (q w e)</div>
<div><span class="Apple-tab-span" style="white-space:pre"> </span>(cond </div><div><span class="Apple-tab-span" style="white-space:pre"> </span>((eq x nil)nil)<span class="Apple-tab-span" style="white-space:pre"> </span></div>
<div><span class="Apple-tab-span" style="white-space:pre"> </span>((atom (car x)) (cons (car x) (MPL (cdr x))))<span class="Apple-tab-span" style="white-space:pre"> </span></div><div><span class="Apple-tab-span" style="white-space:pre"> </span></div>
<div><span class="Apple-tab-span" style="white-space:pre"> </span></div><div><span class="Apple-tab-span" style="white-space:pre"> </span>(t (MCP (MPL (car x)) (MPL (cdr x))))<span class="Apple-tab-span" style="white-space:pre"> </span></div>
<div><span class="Apple-tab-span" style="white-space:pre"> </span></div><div><span class="Apple-tab-span" style="white-space:pre"> </span>)</div><div>)</div><div><br></div><div>(defun MCP (x y)</div>
<div><span class="Apple-tab-span" style="white-space:pre"> </span>(cond </div><div><span class="Apple-tab-span" style="white-space:pre"> </span>((eq x nil) y)<span class="Apple-tab-span" style="white-space:pre"> </span></div>
<div><span class="Apple-tab-span" style="white-space:pre"> </span>(t (cons (car x) (MCP (cdr x) y)))<span class="Apple-tab-span" style="white-space:pre"> </span></div><div><span class="Apple-tab-span" style="white-space:pre"> </span>)<span class="Apple-tab-span" style="white-space:pre"> </span></div>
<div>)<span class="Apple-tab-span" style="white-space:pre"> </span></div><div>(print(MCP '(1 2 3) '(4 5 6)))</div></div><div><div><br></div><div class="gmail_quote">2011/11/5 Waldek Hebisch <span dir="ltr"><<a href="mailto:hebisch@math.uni.wroc.pl">hebisch@math.uni.wroc.pl</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">> Hello!<br>
<div class="im">> I'm trying to make executable file with ECL.<br>
</div>> So i'm save my code in to hello.lisp (small recursive program to test)<br>
<div class="im">> And put in to REPL this:<br>
> >>>(require 'cmp)<br>
</div>> ;;; Loading #P"C:/lispbox/ECL/msvc/CMP.fas"<br>
> ;;; Loading #P"C:/lispbox/ECL/msvc/sysfun.lsp"<br>
<div class="im">> ("CMP")<br>
> >>>(compile-file "hello.lisp" :system-p t)<br>
><br>
> #|.....|#<br>
><br>
</div>> ;;; hello.c<br>
> C:/lispbox/ECL/msvc/hello.c : fatal error C1074: 'IDB' is illegal extension<br>
> for PDB file:<br>
> ;;; Error:<br>
> ;;; * The C compiler failed to compile the intermediate file.<br>
><br>
> Can you please explain what in this situation need to do for success<br>
> compilation?<br>
<br>
I can not anwer your question. But you should definitly post<br>
'hello.lisp' -- without it probably nobody can answer your<br>
question.<br>
<span class="HOEnZb"><font color="#888888"><br>
--<br>
Waldek Hebisch<br>
<a href="mailto:hebisch@math.uni.wroc.pl">hebisch@math.uni.wroc.pl</a><br>
</font></span></blockquote></div><br></div>