[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Changing the mail window's console

To: moon@brazil.cambridge.apple.com
Subject: Re: Changing the mail window's console
From: shirley@parc.xerox.com (Mark Shirley)
Date: Fri, 8 Feb 1991 00:28:41 -0500
Cc: dmitchell@trc.amoco.com, mrc@yukon.scrc.symbolics.com, acw@yukon.scrc.symbolics.com, slug@ai.sri.com
In-reply-to: moon@brazil.cambridge.apple.com's message of Thu, 7 Feb 91 17:23:42 PST <9102080123.AA05289@onyx.parc.xerox.com>
   Several messages about changing the mail window's console ...

I tried this and it didn't quite work.  Specifically, I was using an XL1200
running release 8 from an X terminal (via Xremote) and executed this command:

(cp:define-command (COM-MHS-GRAB-ZMAIL-WINDOW :COMMAND-TABLE "user")
    ()
  (send *zmail-window* :set-superior (tv:mouse-default-superior))
  (multiple-value-call
    *zmail-window* :set-size
    (send (tv:mouse-default-superior) :inside-size))
  (values))

A backtrace is below.  Essentially it died because something didn't expect a
remote X screen while it tried to disconnect the zmail frame from the main
screen.  After poking around a bit and not getting very var, I decided to live
dangerously.  I aborted from this error and tried again.  The second attempt
returned successfully (at least my machine is still running).  <select>-M then
put a zmail frame up on my X terminal.  *However*, Zmail had been initialized
(or I got a brand new window - though I can't see how).  It had to re-read my
zmail init ....  Peek revealed only one Main Zmail Window under the remote X
screen and none under the main screen where it had been.

Does anyone have any suggestions or insight into this mystery?
  Thanks,
    Mark Shirley


A backtrace:

D,#TD1PsT[Begin using 006 escapes](1 0 (NIL 0) (:FIX :ROMAN :TINY) "TINY")In Symbolics XL1200 Command Processor in Genera 8.0 XL, Logical Pathnames Translation Files NEWEST, IP-TCP 422.2, NFS Client 415.0, Network RPC 415.1,
NFS Documentation 404.0, Local-Mods 9.11, X Remote Screen 418.1, CLX 419.0, Experimental X Server 409.0, C Runtime 416.0, Compiler Tools Package 411.0,
Compiler Tools Runtime 411.0, C Packages 413.0, Minimal Lexer Runtime 416.0, Lexer Package 415.0, Syntax Editor Runtime 411.0, TeX-DVI 2.0,
Experimental Illustrate 14.2, Experimental Drw 8, Experimental Copier Demo 1, Experimental prolog-alr 1.0, Experimental General Diagnostic Engine 115,
Experimental Tms 29, Ivory Revision 4 (FPA enabled), FEP 321, FEP0:>i321-loaders.flod(8), FEP0:>i321-info.flod(8), FEP0:>i321-debug.flod(8),
FEP0:>i321-lisp.flod(8), FEP0:>i321-kernel.fep(10), Boot ROM version 318, Device PROM version 318,
922x874 1-bit STATIC-GRAY X Screen NERO:1.0 with 218 Genera fonts (DECWINDOWS (Compatibility String) Network Computing Devices Inc. R2002),
1067x748 B&W Screen, Machine serial number 335,
world booted from FEP0:>8-XL-SERA.ilod.1 on Symbolics XL1200 #335 (ROCKY):



(2 0 (NIL 0) (NIL :BOLD NIL) "CPTFONTCB")Error: The first argument (RASTER) to DECODE-RASTER-ARRAY, #<Indirect Drawable 922x874 at (0 0) in #<XLIB:WINDOW NERO:1 29360134> 2300216115>, was of the wrong type.
       The function expected an array.
0While in the function DECODE-RASTER-ARRAY  (FLAVOR:METHOD TV:SCREEN-FOLLOW-DRAWABLE-INDIRECTION TV:SCREEN-MICROCODED-GRAPHICS-MIXIN)  (FLAVOR:METHOD :ADJUST-SCREEN-ARRAY TV:SHEET)

The condition signalled was ZL:CHECK-ARG

2DECODE-RASTER-ARRAY0  (P.C. = 42)
   Arg 0 (SI:RASTER): #<Indirect Drawable 922x874 at (0 0) in #<XLIB:WINDOW NERO:1 29360134> 2300216115>

2(FLAVOR:METHOD TV:SCREEN-FOLLOW-DRAWABLE-INDIRECTION TV:SCREEN-MICROCODED-GRAPHICS-MIXIN)0  (P.C. = 6)
   Arg 0 (SYS:SELF-MAPPING-TABLE): #<Map to flavor TV:SCREEN-MICROCODED-GRAPHICS-MIXIN 20011001041>
   Arg 1 (SELF): #<MAIN-SCREEN Main Screen 20006400000 exposed>
   Arg 2 (TV:DRAWABLE): #<Indirect Drawable 922x874 at (0 0) in #<XLIB:WINDOW NERO:1 29360134> 2300216115>
   Arg 3 (TV:X-OFFSET): 0
   Arg 4 (TV:Y-OFFSET): 0

2(FLAVOR:METHOD :ADJUST-SCREEN-ARRAY TV:SHEET)0  (P.C. = 21)
   Arg 0 (SYS:SELF-MAPPING-TABLE): #<Map to flavor TV:SHEET 20010410446>
   Arg 1 (SELF): #<ZMAIL-FRAME Main Zmail Window 20006421524 deactivated>
   Arg 2 (ZL:ARRAY): #<TV:SHEET-RASTER 1067x748 for Main Zmail Window 20122646036>
   Arg 3 (TV:NEW-POINTER): #<Indirect Drawable 922x874 at (0 0) in #<XLIB:WINDOW NERO:1 29360134> 2300216115>
(3 0 (NIL 0) (NIL :ITALIC NIL) "CPTFONTI")   --Defaulted args:--
0   Arg 4 (TV:SUP-XOFF): 0
   Arg 5 (TV:SUP-YOFF): 0
   Arg 6 (TV:XOFF): 41
   Arg 7 (TV:YOFF): 41

2(DEFUN-IN-FLAVOR TV:FLUSH-BIT-ARRAY TV:SHEET)0  (P.C. = 55)
   Arg 0 (SYS:SELF-MAPPING-TABLE): #<Map to flavor TV:SHEET 20010410446>
   Arg 1 (SELF): #<ZMAIL-FRAME Main Zmail Window 20006421524 deactivated>

2(FLAVOR:METHOD TV:SHEET-FLUSH-SCREEN-RESOURCES TV:SHEET)0  (P.C. = 16)
   Arg 0 (SYS:SELF-MAPPING-TABLE): #<Map to flavor TV:SHEET 20010410446>
   Arg 1 (SELF): #<ZMAIL-FRAME Main Zmail Window 20006421524 deactivated>

2(FLAVOR:METHOD :CHANGE-OF-SCREEN TV:SHEET)0  (P.C. = 13)
   Arg 0 (SYS:SELF-MAPPING-TABLE): #<Map to flavor TV:SHEET 20010410446>
   Arg 1 (SELF): #<ZMAIL-FRAME Main Zmail Window 20006421524 deactivated>
   Arg 2 (TV:CHANGE-OF-DISPLAY-ATTRIBUTES): T

2(FLAVOR:METHOD :SET-SUPERIOR TV:SHEET)0  (P.C. = 116)
   Arg 0 (SYS:SELF-MAPPING-TABLE): #<Map to flavor TV:SHEET 20010410446>
   Arg 1 (SELF): #<ZMAIL-FRAME Main Zmail Window 20006421524 deactivated>
   Arg 2 (TV:NEW-SUPERIOR): #<X-REAL-SCREEN X Screen NERO:1.0 0 (Genera on ROCKY) 2004052045 exposed>

2(:INTERNAL ZWEI:COM-MHS-GRAB-ZMAIL-WINDOW 0)0  (P.C. = 14)  3(from BD:>shirley>lispm>zmacs-env)

2CP::WITH-STANDARD-OUTPUT-BOUND-INTERNAL0  (P.C. = 75)
   Arg 0 (CP::DESTINATIONS): NIL
   Arg 1 (CP::CONTINUATION): #<DTP-COMPILED-FUNCTION (:INTERNAL ZWEI:COM-MHS-GRAB-ZMAIL-WINDOW 0) 22042336640>

2ZWEI:COM-MHS-GRAB-ZMAIL-WINDOW0  (P.C. = 30)  3(from BD:>shirley>lispm>zmacs-env)
0   Rest Arg: NIL

 Call started to LIST

2CP::COMMAND-LOOP-EVAL-FUNCTION0  (P.C. = 50)
   Arg 0 (CP::FORM): (ZWEI:COM-MHS-GRAB-ZMAIL-WINDOW)
3   --Defaulted args:--
0   Arg 1 (CP::ENVIRONMENT): NIL

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

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

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

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

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

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

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

2SI:LISP-COMMAND-LOOP-INTERNAL0  (P.C. = 40)
   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)

2SI:LISP-COMMAND-LOOP0  (P.C. = 142)
   Arg 0: #<DYNAMIC-LISP-LISTENER Dynamic Lisp Listener 4 2004052204 exposed>
   Rest Arg: (:NAME "Lisp Top Level")

2SI:LISP-TOP-LEVEL10  (P.C. = 16)
   Arg 0 (SI:STREAM): #<DYNAMIC-LISP-LISTENER Dynamic Lisp Listener 4 2004052204 exposed>

2(FLAVOR:METHOD PROCESS::PROCESS-TOP-LEVEL-1 PROCESS:PROCESS)0  (P.C. = 144)
   Arg 0 (SYS:SELF-MAPPING-TABLE): #<Map to flavor PROCESS:PROCESS 20011753046>
   Arg 1 (SELF): #<PROCESS:PROCESS Dynamic Lisp Listener 4 (2 1) 2300111770>

2PROCESS::PROCESS-TOP-LEVEL0  (P.C. = 443)
   Arg 0 (IGNORE): #<PROCESS:PROCESS Dynamic Lisp Listener 4 (2 1) 2300111770>
Follow-Ups:
- Re: Changing the mail window's console
  - From: dmitchell@trc.amoco.com (Donald H. Mitchell)
Prev by Date: Changing the mail window's console
Next by Date: Re: Changing the mail window's console
Previous by thread: Re: Changing the mail window's console
Next by thread: Re: Changing the mail window's console
Index(es):
- Date
- Thread