home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / alt / lucidem / help / 953 < prev    next >
Encoding:
Text File  |  1993-01-27  |  2.2 KB  |  56 lines
  1. x-gateway: rodan.UU.NET from help-lucid-emacs to alt.lucid-emacs.help; Wed, 27 Jan 1993 17:57:56 EST
  2. Date: Wed, 27 Jan 1993 12:26:27 +0100
  3. From: griffith%earley.sns.neuphilologie.uni-tuebingen.de@lucid.com (John Griffith)
  4. Message-ID: <9301271126.AA16100@earley.sns.neuphilologie.uni-tuebingen.de>
  5. Subject: problem sending string to a process
  6. Newsgroups: alt.lucid-emacs.help
  7. Path: sparky!uunet!wendy-fate.uu.net!help-lucid-emacs
  8. Sender: help-lucid-emacs-request@lucid.com
  9. Lines: 45
  10.  
  11.  
  12. I'm using lemacs-19.3 and trying to patch some elisp files that allow
  13. a Quintus prolog file to be evaluated from emacs.  The problem seems
  14. to be that what consitutes a process name is different in 19 than it
  15. was in 18.  Anyway, here's the backtrace I get:
  16.  
  17. Signalling: (file-error "writing to process" "bad file number" #<process qui>)
  18.   process-send-string(#<process qui> "loadregi47
  19. /home/server/griffith/programs/ALE/testgram9.pl14  /tmp/quia04125") 
  20.   send-qui("loadregi47
  21. /home/server/griffith/programs/ALE/testgram9.pl14  /tmp/quia04125")
  22.   (cond ((= sltp-char 112) (save-excursion ... ... ...) (setq word2
  23. "procedure") (send-qui ...)) ((= sltp-char 114) (write-region ... ...
  24. qui-zap-file) (setq word2 "region") (send-qui ...)) ((= sltp-char 98)
  25. (save-excursion ... ...) (setq word2 "buffer") (send-qui ...)) (t
  26. (error "Bad option"))))
  27.   (let (word1 word2 (file-name ...)) (cond (... ...) (... ...)) (cond
  28. (... ... ... ...) (... ... ... ...) (... ... ... ...) (t ...))
  29. (message (concat word1 " " word2 "...")) (sit-for 0)
  30. (&clear-message))) 
  31.   send-load-to-qui("compile" 114)
  32.   (cond ((string-equal ... "") (error "Cannot load from this buffer
  33. before it is written to a file")) (t (sleep-for 1) (message ...)
  34. (send-load-to-qui pl-load-type ...))))
  35.   (let (pl-char) (cond (... ...) (t ... ... ...))))
  36.   qui-load("compile")
  37.   (lambda nil (interactive) (cond (... ...)) (qui-load "compile"))()
  38.   call-interactively(qui-compile)
  39.  
  40.  
  41. The symbol #<process qui> (which I guess is a vector?) is not what the
  42. function process-send-string wants.  Does anybody have an idea how I
  43. can fix this?
  44.  
  45. Thanks,
  46.  
  47. --
  48. John Griffith
  49. Seminar fuer Sprachwissenschaft
  50. Universitaet Tuebingen
  51. Wilhelmstr. 113
  52. W7400 Tuebingen
  53. Germany
  54.  
  55. email: earley.sns.neuphilologie.uni-tuebingen.de
  56.