[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
installing expressing windows (problem)
Hi! I am trying to install express windows for lucid 3.0,
on a Sun SPARC, and the window system is X11 (I can grab the exact version
if relevant).
The problem I have is the following:
I have compiled the files OK, loaded them,
and executed (clear-all).
At this point, the following error message appears:
> (clear-all)
>>Error: X-Error: NAME-ERROR in request 121 (last request was 158) Code 45.0 [O
penFont]
XLIB::X-ERROR:
Required arg 0 (CONDITION): XLIB:NAME-ERROR
Rest arg 1 (KEYARGS): (:DISPLAY #<DISPLAY 0> :ERROR-KEY XLIB:NAME-ERROR :MAJ
OR 45 :MINOR 0 :SEQUENCE 121 ...)
:A 0: Abort to Lisp Top Level
this is the status of the stack:
-> :n
XLIB::REPORT-ERROR:
Required arg 0 (DISPLAY): #<DISPLAY 0>
Required arg 1 (EVENT): #S(XLIB::REPLY-BUFFER SIZE 4096 IBUF8 #<Simple-Vector (UNSIGNED-BYTE 8) 4096 DD4B2E>)
-> :n
XLIB::WAIT-FOR-REPLY:
Required arg 0 (DISPLAY): #<DISPLAY 0>
Required arg 1 (EXPECTED-SIZE): NIL
-> :n
XLIB::QUERY-FONT:
Required arg 0 (FONT): #<Xfont -adobe-courier-medium-r-normal--12-120-75-75-m-70-iso8859-1 8388610>
-> :n
FONT-HEIGHT:
Required arg 0 (FONT): #<Xfont -adobe-courier-medium-r-normal--12-120-75-75-m-70-iso8859-1 8388610>
-> :n
PCL::|(METHOD EXPRESS-WINDOWS:SET-WINDOW-STYLE (EXPRESS-WINDOWS:WINDOW T))|:
Required arg 0 (WINDOW): #<PRESENTATION-WINDOW 67546726>
Required arg 1 (NEW-STYLE): (:FIX :ROMAN :NORMAL)
Optional arg 2 (SET-LINE-HEIGHT): T
It seems, of course, that the problem occurs when EXPRESS-WINDOWS:SET-WINDOW-STYLE
tries to get the height of
the font -adobe-courier-medium-r-normal--12-120-75-75-m-70-iso8859-1
(which is what XLIB:GET-FONT-FROM-STYLE returns for the style (:FIX :ROMAN :NORMAL))
using the macro RECOMPUTE-LINE-HEIGHT.
It may help to know that in order to get this far I had to make the
following changes to the files I ftp-ed from uunet.uu.net:
1) change the suffix `lbin' to `sbin' (for the SPARC compiler)
in LOAD-EW and the value of *Binary-File-Type* as follows:
;;(defvar *Binary-File-Type* #+Excl "fasl" #+lucid "lbin" #+symbolics "BIN") ;; OLD
(defvar *Binary-File-Type* #+Excl "fasl" #+lucid "sbin" #+symbolics "BIN") ;; NEW
2) change the value of *Default-Host* in x-interface.lisp from "Electro" to "".
Thanks
Massimo Poesio
University of Rochester
Computer Science Department
Rochester, NY 14627
email: poesio@cs.rochester.edu
phone: (716) 275-5605