Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Alastair Bridgewater
clx
Commits
b2c0dbce
Commit
b2c0dbce
authored
Feb 21, 2003
by
dan
Browse files
Update in preparation for SBCL 0.7.13 release
darcs-hash:20030221172016-2591e-54dda917ff8b0aaa4969f2d222f386290e2fc74b.gz
parent
0ec96edb
Changes
3
Show whitespace changes
Inline
Side-by-side
README
View file @
b2c0dbce
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
,
a selection of patches were added from other CLXes around the net
.
= Features
- 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
)
- various bug fixes (
Iban Hatchondo and a cast of several
)
= Building
0. You need SBCL 0.7.1
2.25 (CVS version) or any release after that
0. You need SBCL 0.7.1
3 or any later release
1. Untar this tree somewhere
2. Add a symlink to clx.asd from one of the directories listed in your
asdf:*central-registry*
asdf:*central-registry*
If that makes no sense to you yet, choose one of -
2a. personal installation:
$ cd $HOME/.sbcl/systems # you may have to create this directory
$ ln -s /path/to/clx/source/clx.asd .
2b. systemwide installations: you need to ask SBCL where it lives
$ sbcl --noinform --eval '(format t "~A~%" (posix-getenv "SBCL_HOME"))' </dev/null
/usr/local/lib/sbcl/
*
$ cd /usr/local/lib/sbcl/site-systems
$ ln -s /path/to/clx/source/clx.asd .
3.
* (require 'asdf)
...
...
@@ -59,4 +74,4 @@ For packaging or SBCL-specific problems, mail dan at metacircles.com
--
Heavy lifting by Raymond.Wiker@fast.no
ASDFized version and ongoing by Daniel Barlow <dan@metacirles.com>
ASDFized version and ongoing by Daniel Barlow <dan@metacir
c
les.com>
clx.asd
View file @
b2c0dbce
...
...
@@ -27,7 +27,7 @@
(
defsystem
CLX
:depends-on
(
sb-bsd-sockets
)
:version
"0.4"
:version
"0.4
.1
"
:serial
t
:components
((
:file
"package"
)
...
...
dependent.lisp
View file @
b2c0dbce
...
...
@@ -1409,8 +1409,8 @@
(
declare
(
ignore
protocol
)
(
type
(
integer
0
)
display
))
(
socket-make-stream
(
if
(
or
(
string=
host
""
)
(
string=
host
"unix"
))
; AF_
UNIX
domain socket
(
let
((
s
(
make-instance
'
unix
-socket
:type
:stream
)))
(
if
(
or
(
string=
host
""
)
(
string=
host
"unix"
))
; AF_
LOCAL
domain socket
(
let
((
s
(
make-instance
'
local
-socket
:type
:stream
)))
(
socket-connect
s
(
format
nil
"~A~D"
+X-unix-socket-path+
display
))
s
)
(
let
((
host
(
car
(
host-ent-addresses
(
get-host-by-name
host
)))))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment