<html>
<head>
<meta name="generator" content="Windows Mail 17.5.9600.20689">
<style data-externalstyle="true"><!--
p.MsoListParagraph, li.MsoListParagraph, div.MsoListParagraph {
margin-top:0in;
margin-right:0in;
margin-bottom:0in;
margin-left:.5in;
margin-bottom:.0001pt;
}
p.MsoNormal, li.MsoNormal, div.MsoNormal {
margin:0in;
margin-bottom:.0001pt;
}
p.MsoListParagraphCxSpFirst, li.MsoListParagraphCxSpFirst, div.MsoListParagraphCxSpFirst,
p.MsoListParagraphCxSpMiddle, li.MsoListParagraphCxSpMiddle, div.MsoListParagraphCxSpMiddle,
p.MsoListParagraphCxSpLast, li.MsoListParagraphCxSpLast, div.MsoListParagraphCxSpLast {
margin-top:0in;
margin-right:0in;
margin-bottom:0in;
margin-left:.5in;
margin-bottom:.0001pt;
line-height:115%;
}
--></style></head>
<body dir="ltr">
<div data-externalstyle="false" dir="ltr" style="font-family: 'Calibri', 'Meiryo', 'Segoe UI', 'Microsoft YaHei UI', 'Microsoft JhengHei UI', 'Malgun Gothic', 'sans-serif';font-size:12pt;">
<div>Thanks for quick response!</div><div>Encouraged by your successful trial, I changed the underlying</div><div>compiler from Intel icl to MS cl. Voila! It works now. haha 😊</div><div><br></div><div>As for earlier “baz” program for srt->smi translation,</div><div>the culprit was the modification of list; compiler isn’t the cause.</div><div>But the error is correctable:</div><div><br></div><div>(tx (s)<br> (mapl (lambda (s) (rplaca s (format nil "~{~a~}~:[~;<br>~]" (map 'list #'tr (car s)) (cdr s)))) s))</div><div data-signatureblock="true"><br><div>Sent from Windows Mail</div><div><br></div></div><div style="padding-top: 5px; border-top-color: rgb(229, 229, 229); border-top-width: 1px; border-top-style: solid;"><div><font face=" 'Calibri', 'Meiryo', 'Segoe UI', 'Microsoft YaHei UI', 'Microsoft JhengHei UI', 'Malgun Gothic', 'sans-serif'" style='line-height: 15pt; letter-spacing: 0.02em; font-family: "Calibri", "Meiryo", "Segoe UI", "Microsoft YaHei UI", "Microsoft JhengHei UI", "Malgun Gothic", "sans-serif"; font-size: 12pt;'><b>From:</b> <a href="mailto:pjb@informatimago.com" target="_parent">Pascal J. Bourguignon</a></font><br></div></div><div dir=""><div><snip><br></div><blockquote style="margin-top: 0px; margin-bottom: 0px;"><div>The compiled code refuses to run, presumably choking at the macro expansion above.</div><div>If I eval the lower diff::intern-files by c-x c-e, the code runs fine.</div></blockquote><div><br></div><div>Works for me:</div><div><br></div><div>; SLIME 2014-08-01</div><div>…<br></div>
<br></div>
</div>
</body>
</html>