<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">

<head>
<meta http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<meta name=Generator content="Microsoft Word 12 (filtered medium)">
<style>
<!--
 /* Font Definitions */
 @font-face
        {font-family:Wingdings;
        panose-1:5 0 0 0 0 0 0 0 0 0;}
@font-face
        {font-family:"Cambria Math";
        panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
        {font-family:Calibri;
        panose-1:2 15 5 2 2 2 4 3 2 4;}
 /* Style Definitions */
 p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0in;
        margin-bottom:.0001pt;
        font-size:11.0pt;
        font-family:"Calibri","sans-serif";}
a:link, span.MsoHyperlink
        {mso-style-priority:99;
        color:blue;
        text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {mso-style-priority:99;
        color:purple;
        text-decoration:underline;}
span.EmailStyle17
        {mso-style-type:personal-compose;
        font-family:"Calibri","sans-serif";
        color:windowtext;}
.MsoChpDefault
        {mso-style-type:export-only;}
@page Section1
        {size:8.5in 11.0in;
        margin:1.0in 1.0in 1.0in 1.0in;}
div.Section1
        {page:Section1;}
-->
</style>
<!--[if gte mso 9]><xml>
 <o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
 <o:shapelayout v:ext="edit">
  <o:idmap v:ext="edit" data="1" />
 </o:shapelayout></xml><![endif]-->
</head>

<body lang=EN-US link=blue vlink=purple>

<div class=Section1>

<p class=MsoNormal>So, ive decided I should probably use ecl lisp. So heres da
problem. Examine this output that produced an error:<o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal>(:emacs-rex                                        ;;the
request<o:p></o:p></p>

<p class=MsoNormal> (swank:connection-info)<o:p></o:p></p>

<p class=MsoNormal> "COMMON-LISP-USER" t 1)<o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal>;; response – read error given below!!<o:p></o:p></p>

<p class=MsoNormal>Debugger entered: nil<o:p></o:p></p>

<p class=MsoNormal>  (condition-case error (slime-net-read) (error (debug) (slime-net-close
process t) (error "net-read error: %S" error)))<o:p></o:p></p>

<p class=MsoNormal>  slime-net-read-or-lose(#<process SLIME Lisp>)<o:p></o:p></p>

<p class=MsoNormal>  slime-process-available-input(#<process SLIME Lisp>)<o:p></o:p></p>

<p class=MsoNormal>  slime-net-filter(#<process SLIME Lisp><o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal>;;the response which produced above error<o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal>13(:return (:ok (:pid 5548 :style nil :lisp-implementation
(:type \"ECL\" :name \"ECL\" :version \"9.12.3\")<o:p></o:p></p>

<p class=MsoNormal>                                 :machine (:instance
\"SE\")) 1)                  ;;<span style='font-family:Wingdings'>ß</span>---------------Threading
issue???<o:p></o:p></p>

<p class=MsoNormal>                   TH-PC\" :type \"x86\"
:version \"17\")               ;;<span style='font-family:Wingdings'>ß</span>----Should
be “SETH-PC but its broken up!!!!<o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal>  :features (:wsock :win32 :formatter :uint32-t :uint16-t
:relative-package-names :unicode :dffi :clos-streams :cmu-format :msvc :ecl-pde
:dlopen   <o:p></o:p></p>

<p class=MsoNormal> :clos :threads :boehm-gc :ansi-cl :common-lisp
:ieee-floating-point :prefixed-api :ffi :pentium4 :common :ecl) <o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal>:modules (\"SB-BSD-SOCKETS\"
\"SOCKETS\")<o:p></o:p></p>

<p class=MsoNormal>:package (:name \"COMMON-LISP-USER\" :prompt
\"CL-USER\") :version \"2009-12-23")<o:p></o:p></p>

<div style='mso-element:para-border-div;border:none;border-bottom:solid windowtext 1.0pt;
padding:0in 0in 9.0pt 0in'>

<p class=MsoNormal style='border:none;padding:0in'><o:p> </o:p></p>

</div>

<p class=MsoNormal>Compare this with the pristine clisp output <o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal>(:emacs-rex<o:p></o:p></p>

<p class=MsoNormal> (swank:connection-info)<o:p></o:p></p>

<p class=MsoNormal> "COMMON-LISP-USER" t 1)<o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal>(:indentation-update<o:p></o:p></p>

<p class=MsoNormal> (("with-c-var" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("with-c-place" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("with-foreign-string" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("with-foreign-object" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("with-defining-c-type" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("with-name/options" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("with-window" . 0)<o:p></o:p></p>

<p class=MsoNormal>  ("with-output-to-printer" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("define-setf-method" . 2)<o:p></o:p></p>

<p class=MsoNormal>  ("letf*" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("letf" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("muffle-cerrors" . 0)<o:p></o:p></p>

<p class=MsoNormal>  ("without-global-handlers" . 0)<o:p></o:p></p>

<p class=MsoNormal>  ("with-http-output" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("with-collect" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("with-http-input" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("without-package-lock" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("appease-cerrors" . 0)<o:p></o:p></p>

<p class=MsoNormal>  ("with-restarts" . 1)<o:p></o:p></p>

<p class=MsoNormal>  ("fcase" . 2)<o:p></o:p></p>

<p class=MsoNormal>  ...))<o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal>(:return<o:p></o:p></p>

<p class=MsoNormal> (:ok<o:p></o:p></p>

<p class=MsoNormal>  (:pid 5748 :style nil :lisp-implementation<o:p></o:p></p>

<p class=MsoNormal>                (:type "CLISP" :name
"clisp" :version "2.48 (2009-07-28) (built on stnt067
[192.168.0.1])")<o:p></o:p></p>

<p class=MsoNormal>                :machine<o:p></o:p></p>

<p class=MsoNormal>                (:instance "Seth-PC [192.168.2.3]"
:type "PC/386" :version "PC/A86")<o:p></o:p></p>

<p class=MsoNormal>                :features<o:p></o:p></p>

<p class=MsoNormal>                (:cl-fad cffi-features:x86
cffi-features:windows :cffi :x86 :windows :little-endian :asdf :readline
:regexp :syscalls :i18n :loop :compiler :clos :mop :clisp :ansi-cl :common-lisp
:lisp=cl ...)<o:p></o:p></p>

<p class=MsoNormal>                :modules<o:p></o:p></p>

<p class=MsoNormal>                ("SWANK-ARGLISTS"
"SWANK-C-P-C" "ASDF" "readline"
"regexp" "syscalls" "i18n")<o:p></o:p></p>

<p class=MsoNormal>                :package<o:p></o:p></p>

<p class=MsoNormal>                (:name "COMMON-LISP-USER" :prompt
"CL-USER")<o:p></o:p></p>

<p class=MsoNormal>                :version "2009-12-23"))<o:p></o:p></p>

<p class=MsoNormal> 1)<o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal>So… Recently ecl had made threading a requirement for
windows, and maybe for some other platforms. I don’t know if this was the
start of the bug as I have not yet gone back in ecl versions and seen which one
works. The error on startup DOES NOT occur consistently which is very puzzling.
But, anyways, I would like ecl lisp to act like a ‘single threaded lisp’
as far as slime is concerned so that I can eliminate threading issues generated
by the slime  lisp code.<o:p></o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

<p class=MsoNormal><o:p> </o:p></p>

</div>

</body>

</html>