[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Lisp break with goodwill EW



Goodwill EW compiled on my Symbolics running Genera 8.0 without a hitch. However,
I encountered the following break while I started running it.

In order to see at least one EW window show up on either my SUN3 
(running X), I did the following:

a)  Added the Symbolics to the X-server's access control list via the xhost command.

b)  On the Lisp machine, I did the following:

	> (in-package 'ew)

	> (setf ew::*Default-Host* "spike")         ;; that's the name of my Sun  (the X server)
	
	> (clear-all)

	> (initialize-window-system)

	;; No root window appeared.  Any ideas why?
	;; In order to run the demos in demos.lisp, should one use (run-program 'demo)?

	> (run-program 'lisp-window)

whereupon I got the following break

Thanks for any input.

--Ramu
ramu%tcipro.uucp@unix.sri.com
---------------------------------cut here--------------------------------------------------------


Trap: The variable EW::*UNREAD-CHAR* is unbound.
0While in the function EW::LISTEN-ANY  EW::READ-CHAR-FOR-QUERY-INTERNAL  EW::EDITOR

The condition signalled was DBG:UNBOUND-SYMBOL-TRAP
Trap microcode PC = #o2 in 3675-MIC 430
Error-table entry = (BAD-DATA-TYPE)

1EW::LISTEN-ANY0  (P.C. = 2)  (2 0 (NIL 0) (NIL :ITALIC NIL) "CPTFONTI")(from ALBA:>iyer>ew>code>x-interface)
0   Arg 0 (STREAM): #<EW::PROGRAM-PANE 200077326>
   Arg 1 (EW::TIMEOUT): 0

1EW::READ-CHAR-FOR-QUERY-INTERNAL0  (P.C. = 154)  2(from ALBA:>iyer>ew>code>query)
0   Arg 0 (STREAM): #<EW::PROGRAM-PANE 200077326>

1EW::EDITOR0  (P.C. = 247)  2(from ALBA:>iyer>ew>code>input-editor)
0   Arg 0 (STREAM): #<EW::PROGRAM-PANE 200077326>

1EW:READ-CHAR-FOR-QUERY0  (P.C. = 7)  2(from ALBA:>iyer>ew>code>query)
0   Arg 0 (STREAM): #<EW::PROGRAM-PANE 200077326>

1EW:PEEK-CHAR-FOR-QUERY0  (P.C. = 20)  2(from ALBA:>iyer>ew>code>query)
0   Arg 0 (STREAM): #<EW::PROGRAM-PANE 200077326>
   Arg 1 (EW::HANG): T

1EW::|parser-COMMAND-OR-FORM|0  (P.C. = 34)  2(from ALBA:>iyer>ew>code>proprietary-presentation-types)
0   Arg 0 (STREAM): #<EW::PROGRAM-PANE 200077326>
   Arg 1 (TYPE): (EW::COMMAND-OR-FORM #<Command Table LISP-WINDOW> :DISPATCH-MODE :FORM-PREFERRED)
   Arg 2 (EW::ORIGINAL-TYPE): (EW::COMMAND-OR-FORM #<Command Table LISP-WINDOW> :DISPATCH-MODE :FORM-PREFERRED)
   Arg 3 (EW::INITIALLY-DISPLAY-POSSIBILITIES): NIL
   Arg 4 (EW::DEFAULT): NIL
   Arg 5 (EW::DEFAULT-SUPPLIED): NIL
   Arg 6 (EW::DEFAULT-TYPE): (EW::COMMAND-OR-FORM #<Command Table LISP-WINDOW> :DISPATCH-MODE :FORM-PREFERRED)

1(:INTERNAL EW:QUERY 0 EW::QUERY-2)0  (P.C. = 34)  2(from ALBA:>iyer>ew>code>query)
0   Arg 0 (COMPILER:.LEXICAL-ENVIRONMENT-POINTER.): ((EW::COMMAND-OR-FORM #<Command Table LISP-WINDOW> :DISPATCH-MODE :FORM-PREFERRED) (:STREAM #<EW::PROGRAM-PANE 200077326> :PROMPT-MODE :RAW :PROMPT "> ") #<EW::PROGRAM-PANE 200077326> (EW::COMMAND-OR-FORM #<Command Table LISP-WINDOW> :DISPATCH-MODE :FORM-PREFERRED) NIL (EW::COMMAND-OR-FORM #<Command Table LISP-WINDOW> :DISPATCH-MODE :FORM-PREFERRED) NIL 0 (EW::COMMAND-OR-FORM #<Command Table LISP-WINDOW> :DISPATCH-MODE :FORM-PREFERRED) EW::|parser-COMMAND-OR-FORM|)

1EW::INPUT-EDITOR-INTERNAL0  (P.C. = 6)  2(from ALBA:>iyer>ew>code>input-editor)
0   Arg 0 (STREAM): #<EW::PROGRAM-PANE 200077326>
   Arg 1 (EW::STATE): #<Input Editor State "" Cursorpos 0 Scan 0 not scanning.>
   Arg 2 (EW::CONTINUATION): #<LEXICAL-CLOSURE (:INTERNAL EW:QUERY 0 EW::QUERY-2) 25551235>

1(CLOS:METHOD EW::INPUT-EDITOR (EW:WINDOW T))0  (P.C. = 123)  2(from ALBA:>iyer>ew>code>input-editor)
0   Arg 0 (STREAM): #<EW::PROGRAM-PANE 200077326>
   Arg 1 (CLOS-INTERNALS::.EXTRA-ARGUMENT.): NIL
   Arg 2 (CLOS-INTERNALS::.GENERIC.): #<SYS:GENERIC-FUNCTION EW::INPUT-EDITOR 70537523>
   Arg 3 (EW::CONTINUATION): #<LEXICAL-CLOSURE (:INTERNAL EW:QUERY 0 EW::QUERY-2) 25551235>

1EW:QUERY0  (P.C. = 437)  2(from ALBA:>iyer>ew>code>query)
0   Arg 0: (EW::COMMAND-OR-FORM #<Command Table LISP-WINDOW> :DISPATCH-MODE :FORM-PREFERRED)
   Rest arg: (:STREAM #<EW::PROGRAM-PANE 200077326> :PROMPT-MODE :RAW :PROMPT "> ")

1EW:READ-PROGRAM-COMMAND0  (P.C. = 127)  2(from ALBA:>iyer>ew>code>frames)
0   Arg 0 (EW::PROGRAM): #<Program LISP-WINDOW>
   Rest arg (EW::OPTIONS): (:PROMPT "> " :COMMAND-QUERY (EW::COMMAND-OR-FORM #<Command Table LISP-WINDOW> :DISPATCH-MODE :FORM-PREFERRED) :UNKNOWN-ACCELERATOR-IS-COMMAND NIL)

1EW:DEFAULT-COMMAND-TOP-LEVEL0  (P.C. = 173)  2(from ALBA:>iyer>ew>code>frames)
0   Arg 0 (EW::PROGRAM): #<Program LISP-WINDOW>
   Rest arg (EW::OPTIONS): NIL

1EW:RUN-PROGRAM0  (P.C. = 113)  2(from ALBA:>iyer>ew>code>frames)
0   Arg 0 (EW::FRAMEWORK-NAME): EW:LISP-WINDOW

1CP::COMMAND-LOOP-EVAL-FUNCTION0  (P.C. = 27)
   Arg 0 (CP::FORM): (EW:RUN-PROGRAM (QUOTE EW:LISP-WINDOW))
2   --Defaulted args:--
0   Arg 1 (CP::ENVIRONMENT): NIL

1(:INTERNAL SI:WITH-PROCESS-NON-INTERACTIVE-PRIORITY-INTERNAL 0)0  (P.C. = 5)
   Arg 0 (COMPILER:.LEXICAL-ENVIRONMENT-POINTER.): #<LOCATIVE 144344323>
   Arg 1 (PROCESS:START-DELAYED-PRIORITIES): #<STACK-LEXICAL-CLOSURE (:INTERNAL PROCESS::WITH-DELAYED-PROCESS-PRIORITIES-INTERNAL 0 PROCESS::START-TIMERS) 144344350>

1PROCESS::WITH-DELAYED-PROCESS-PRIORITIES-INTERNAL0  (P.C. = 124)
   Arg 0 (PROCESS::CONTINUATION): #<STACK-LEXICAL-CLOSURE (:INTERNAL SI:WITH-PROCESS-NON-INTERACTIVE-PRIORITY-INTERNAL 0) 144344326>
   Arg 1 (PROCESS::PRIORITY): T
   Rest arg (PROCESS::NEW-PRIORITIES): (2.0 -822083583)

1SI:WITH-PROCESS-NON-INTERACTIVE-PRIORITY-INTERNAL0  (P.C. = 31)
   Arg 0 (PROCESS:PROCESS): #<PROCESS:PROCESS Dynamic Lisp Listener 1 (2 1) 520006503>
   Arg 1 (PROCESS::CONTINUATION): #<STACK-LEXICAL-CLOSURE (:INTERNAL # 0 SI:WITH-PROCESS-NON-INTERACTIVE-PRIORITY-BODY) 144344250>
   Rest arg: NIL

1TV:WITH-NOTIFICATION-MODE-INTERNAL0  (P.C. = 15)
   Arg 0 (TV:NEW-MODE): :BLAST
   Arg 1 (TV:STREAM): #:TERMINAL-IO-SYN-STREAM
   Arg 2 (TV:CONTINUATION): #<STACK-LEXICAL-CLOSURE (:INTERNAL # 0) 144344217>

1(:INTERNAL SI:WITH-PROCESS-INTERACTIVE-PRIORITY-INTERNAL 0)0  (P.C. = 3)
   Arg 0 (COMPILER:.LEXICAL-ENVIRONMENT-POINTER.): #<LOCATIVE 144344155>

1PROCESS::WITH-PROCESS-PRIORITY-INTERNAL0  (P.C. = 61)
   Arg 0 (PROCESS::CONTINUATION): #<STACK-LEXICAL-CLOSURE (:INTERNAL SI:WITH-PROCESS-INTERACTIVE-PRIORITY-INTERNAL 0) 144344160>
   Arg 1 (PROCESS::NEW-PRIORITY): -824180735

1SI:WITH-PROCESS-INTERACTIVE-PRIORITY-INTERNAL0  (P.C. = 57)
   Arg 0 (PROCESS:PROCESS): #<PROCESS:PROCESS Dynamic Lisp Listener 1 (2 1) 520006503>
   Arg 1 (PROCESS::CONTINUATION): #<STACK-LEXICAL-CLOSURE (:INTERNAL SI:LISP-COMMAND-LOOP-INTERNAL 0 SI:WITH-PROCESS-INTERACTIVE-PRIORITY-BODY) 144344143>
   Rest arg: NIL

1SI:LISP-COMMAND-LOOP-INTERNAL0  (P.C. = 24)
   Arg 0 (PROCESS::NAME): "Lisp Top Level"
   Arg 1 (SI:ABORT-FUNCTION): NIL
   Arg 2 (SI:READ-FUNCTION): NIL
   Arg 3 (SI:EVAL-FUNCTION): NIL
   Arg 4 (SI:PRINT-FUNCTION): NIL
   Arg 5 (PROCESS::INITIAL-FORM): NIL
   Arg 6 (SI:STANDARD-VALUE-BINDINGS): (NIL)

1SI:LISP-COMMAND-LOOP0  (P.C. = 100)
   Arg 0: #<DYNAMIC-LISP-LISTENER Dynamic Lisp Listener 1 12202375 exposed>
   Rest arg: (:NAME "Lisp Top Level")

1SI:LISP-TOP-LEVEL10  (P.C. = 6)
   Arg 0 (SI:STREAM): #<DYNAMIC-LISP-LISTENER Dynamic Lisp Listener 1 12202375 exposed>

1(FLAVOR:METHOD PROCESS::PROCESS-TOP-LEVEL-1 PROCESS:PROCESS)0  (P.C. = 114)
   Arg 0 (SELF): #<PROCESS:PROCESS Dynamic Lisp Listener 1 (2 1) 520006503>
   Arg 1 (SYS:SELF-MAPPING-TABLE): #<Map to flavor PROCESS:PROCESS 440146046>
   Arg 2 (FLAVOR::.GENERIC.): #<SYS:GENERIC-FUNCTION PROCESS::PROCESS-TOP-LEVEL-1 12445741>

1PROCESS::PROCESS-TOP-LEVEL0  (P.C. = 311)
2   --Defaulted args:--
0   Arg 0 (IGNORE): NIL

   Special EW::*UNREAD-CHAR*: "unbound"

------------------------------------------cut here---------------------------------------------


To: express-windows@atc
Subject: Goodwill EW under Franz trouble
Date: Fri, 24 Aug 90 08:56 PDT
From: mac@trantor.harris-atd


  I grabbed a copy of the Goodwill version of EW yesterday and
I'm having a problem compiling it. When (compile-ew) gets done
compiling code/io-functions and loads it, my lisp hangs waiting
for input. This is caused by the (setup-lisp-functions) call. Has
anyone else run across this? Any fixes?  I'm running Allegro
Common Lisp 3.1.13 on a Sun3.

  Thanks,

  Mike McDonald

  mac@trantor.harris-atd.com
  (407) 727-5060

  Advanced Technology Dept.
  Harris Corp.
  M.S. 3A-1912
  P.O. Box 37
  Melbourne, Florida
             32902