Skip to content
Snippets Groups Projects
Commit 7862b433 authored by dan's avatar dan
Browse files

Prepare for first release (0.4, continuing the numbering from Raymond's

Prepare for first release (0.4, continuing the numbering from Raymond's
releases)

README.SBCL -> README
README -> README-R5

Fixed demo/menu to open-default-display

darcs-hash:20030209233610-2591e-d92738ca47de7776a71f7d0c06a78f39818fbe24.gz
parent 1b0cfaa2
No related branches found
Tags v0_4_1_
No related merge requests found
This directory contains CLX, an X11 client library for Common
Lisp. The code was originally taken from a CMUCL distribution, was
modified somewhat in order to make it compile and run under SBCL, then
a selection of patches were added from other CLXes around the net,
Original CLX README, retained for historical information. See README.SBCL
for more recent information
= Features
---
These files contain beta code, but they have been tested to some extent under
Symbolics, TI, Lucid and Franz. The files have been given .l suffixes to keep
them within 12 characters, to keep SysV sites happy. Please rename them with
more appropriate suffixes for your system.
- SHAPE extension support (Gilbert Baumann)
- X authority support that works with ssh forwarding (Eric Marsden via CMUCL)
- OPEN-DEFAULT-DISPLAY function, as the name suggests, does that (dan)
- various bug fixes (mostly thanks to Iban Hatchondo)
= Building
For Franz systems, see exclREADME.
0. You need SBCL 0.7.12.25 (CVS version) or any release after that
1. Untar this tree somewhere
For Symbolics systems, first rename all the .l files to .lisp. Then edit your
sys.translations file so that sys:x11;clx; points to this directory and put a
clx.system file in your sys:site;directory that has the form
2. Add a symlink to clx.asd from one of the directories listed in your
asdf:*central-registry*
(si:set-system-source-file "clx" "sys:x11;clx;defsystem.lisp")
3.
* (require 'asdf)
* (require 'clx)
in it. After that CLX can be compiled with the "Compile System CLX" command
and loaded with the "Load System CLX" command.
This will load all the files, after compiling anything that needs compiling
4. To test CLX (and get a small amount of Lisp advocacy), try loading
the file "demo/menu", and then executing the function
xlib::just-say-lisp.
* (load "clx/demo/menu")
* (xlib::just-say-lisp)
For TI systems, rename all the .l files to .lisp, and make a clx.translations
file in your sys:site; directory pointing to this directory and a
sys:site;clx.system file like the one described for symbolics systems above,
but with the defsystem file being in the clx:clx; directory. Then CLX can be
compiled with (make-system "CLX" :compile :noconfirm) and loaded with
(make-system "CLX" :noconfirm).
5. If you're new to Lisp, be advised that despite the examples in
demo/, it's generally /not/ considered good style to switch to the
:xlib package and write your code in it. Spend some time with a
language reference to familiarize yourself with USE-PACKAGE, or
better yet, the USE option to DEFPACKAGE
= Known problems:
For Lucid systems, you should rename all the .l files to .lisp too (This might
not be possible on SysV systems). After loading the defsystem.l file, CLX can
be compiled with the (compile-clx) function and loaded with the
(load-clx) form.
1) tests/image.lisp seems not to work. "On the other hand, it also
seems broken under CMUCL, so it might be something like the current
colour depth."
The ms-patch.uu file is a patch to Lucid version 2 systems. You probably
don't need it, as you are probably running Lucid version 3 or later, but if
you are still using Lucid version 2, you need this patch. You'll need to
uudecode it to produce the binary.
= Bug reports, new features, patches
The best place to send bug reports, especially if you can verify that
some other CLX port (e.g. CMUCL's) also has the problem, is to the
portable-clx-devel list
http://clozure.com/cgi-bin/mailman/listinfo/portable-clx-devel
For kcl systems, after loading the defsystem.l file, CLX can be compiled with
the (compile-clx) function and loaded with the (load-clx) form.
For packaging or SBCL-specific problems, mail dan at metacircles.com
-dan
For more information, see defsystem.l and provide.l.
--
Heavy lifting by Raymond.Wiker@fast.no
ASDFized version and ongoing by Daniel Barlow <dan@metacirles.com>
Original CLX README, retained for historical information
---
These files contain beta code, but they have been tested to some extent under
Symbolics, TI, Lucid and Franz. The files have been given .l suffixes to keep
them within 12 characters, to keep SysV sites happy. Please rename them with
more appropriate suffixes for your system.
For Franz systems, see exclREADME.
For Symbolics systems, first rename all the .l files to .lisp. Then edit your
sys.translations file so that sys:x11;clx; points to this directory and put a
clx.system file in your sys:site;directory that has the form
(si:set-system-source-file "clx" "sys:x11;clx;defsystem.lisp")
in it. After that CLX can be compiled with the "Compile System CLX" command
and loaded with the "Load System CLX" command.
For TI systems, rename all the .l files to .lisp, and make a clx.translations
file in your sys:site; directory pointing to this directory and a
sys:site;clx.system file like the one described for symbolics systems above,
but with the defsystem file being in the clx:clx; directory. Then CLX can be
compiled with (make-system "CLX" :compile :noconfirm) and loaded with
(make-system "CLX" :noconfirm).
For Lucid systems, you should rename all the .l files to .lisp too (This might
not be possible on SysV systems). After loading the defsystem.l file, CLX can
be compiled with the (compile-clx) function and loaded with the
(load-clx) form.
The ms-patch.uu file is a patch to Lucid version 2 systems. You probably
don't need it, as you are probably running Lucid version 3 or later, but if
you are still using Lucid version 2, you need this patch. You'll need to
uudecode it to produce the binary.
For kcl systems, after loading the defsystem.l file, CLX can be compiled with
the (compile-clx) function and loaded with the (load-clx) form.
For more information, see defsystem.l and provide.l.
This directory contains CLX, which is an X11 client library for Common
Lisp. The code was originally taken from a CMUCL distribution, and has
been modified somewhat in order to make it compile and run under SBCL.
Note: I just tried the image.lisp file under tests, and it seems not
to work. Bummer. On the other hand, it also seems broken under CMUCL,
so it might be something like the current colour depth.
The library requires sb-bsd-sockets from the SBCL contrib (0.7.13 or
later)
The build process for CLX under SBCL requires ASDF (again, in SBCL
contrib) - symlink clx.asd into a directory on your *central-registry*
and evaluate `(asdf:operate 'asdf:load-op 'clx)
To test CLX (and get a small amount of Lisp advocacy), try loading the
file "demo/menu", and then executing the function xlib::just-say-lisp
with the argument "localhost":
(load "clx/demo/menu")
(xlib::just-say-lisp "unix")
There seem to be X authentication problems remaining: if you get
"Connection failure to X11.0 server unix display 0: No protocol specified"
or similar, you can workaround using xhost(1) to open up access
--
Heavy lifting by Raymond.Wiker@fast.no
This ASDFized version by Daniel Barlow <dan@metacirles.com>
;;; -*- Lisp mode -*-
;;; -*- Lisp -*- mode
;;; Original copyright message from defsystem.lisp:
......
......@@ -273,8 +273,8 @@
;; Make menu visible
(MAP-WINDOW menu-window)))
(defun just-say-lisp (host &optional (font-name "fixed"))
(let* ((display (OPEN-DISPLAY host))
(defun just-say-lisp (&optional (font-name "fixed"))
(let* ((display (open-default-display))
(screen (first (DISPLAY-ROOTS display)))
(fg-color (SCREEN-BLACK-PIXEL screen))
(bg-color (SCREEN-WHITE-PIXEL screen))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment