I know I sent this already but I have been having email problems and its
possible that I missed a reply.  Sorry for the resend.

 

 

 

I have been running a program under my Linux laptop with CMUCL that
spawns a process.  This is the code that I use to spawn and run a
separate program:

 

              (setf model-process (ext:run-program "/usr/local/bin/lisp"
'("-load" "/home/gimpytor/ton-new/model-runner")

                                                                   :wait
t :pty t))

              (if (ext:process-p model-process)

                  (ext:process-close model-process))

 

The if statement closes the program's running window when its done and
allows me to continue on.

 

The problem is that I am now porting the code to a Solaris 8 machine and
this code does not close my window and allow the next process to spawn.

 

Does anyone know what could will kill or close the process?  I have also
tried this and it did not work:

 

              (setf model-process (ext:run-program "/usr/local/bin/lisp"
'("-load" "/home/gimpytor/ton-new/model-runner")

                                                                   :wait
t :pty t))

              (if (ext:process-p model-process)

                  (ext:process-kill model-process (ext:process-exit-code
model-process)))

 

Thanks for any help.

 

Kevin Tor

Penn State University

 




Reply via email to