[Paul, I hope you don't mind that I've cc'd the list]
"Paul Werkowski" <[EMAIL PROTECTED]> writes:
> >Hi everyone,
> >
> >I'm playing around with clm (the motif interface, not the music
> >package). I've copied the example code from the end of the manual,
> >but when I try to run it, it hangs (though I can still break out and
> >go back to the top-level). The motif debugger works, so I'm guessing
> >there's something wrong with the code. Here it is:
>
>
> I tried your code here. It works fine.
> There may be some configuration problem on your end, like motifd is in
> a strange place or your network connections are messed up.
I found the problem. I had a dead copy of motifd running sitting on
port 9000. I wasn't answering requests, but it was prevent new copies
from running. The debugger runs motifd with "-local" which doesn't
create a socket.
This patch will signal an error immediately and print the output from
motifd rather than just hanging:
--- cmucl-clm/motif/interface-glue.lisp~ Mon Dec 31 03:15:24 2001
+++ cmucl-clm/motif/interface-glue.lisp Tue Mar 19 20:49:04 2002
@@ -133,6 +133,8 @@
(let ((process (ext:run-program (merge-pathnames *clm-binary-name*
*clm-binary-directory*)
'()
+ :output *error-output*
+ :error :output
:wait nil
:status-hook #'local-server-status-hook)))
(unless (and process (ext:process-alive-p process))
Thanks again to all who helped,
cbb
--
7:57pm up 5 days, 23:45, 1 user, load average: 0.19, 0.11, 0.04
