~mdw
/
zone
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
098b57a
)
sys.lisp: Use OS:UNAME rather than UNIX:GET-HOST-NAME in CLisp.
author
Mark Wooding
<mdw@distorted.org.uk>
Sun, 22 Apr 2012 17:55:48 +0000
(18:55 +0100)
committer
Mark Wooding
<mdw@distorted.org.uk>
Sun, 22 Apr 2012 17:55:48 +0000
(18:55 +0100)
The latter appears to have been withdrawn in later versions of CLisp.
sys.lisp
patch
|
blob
|
blame
|
history
diff --git
a/sys.lisp
b/sys.lisp
index
9f900f7
..
bcc8433
100644
(file)
--- a/
sys.lisp
+++ b/
sys.lisp
@@
-42,7
+42,7
@@
(sb-unix:unix-gethostname)
#+clisp
(sb-unix:unix-gethostname)
#+clisp
- (
unix:get-host-name
)
+ (
os:uname-nodename (os:uname)
)
#+ecl
(cffi:with-foreign-pointer-as-string (buffer 256 len)
#+ecl
(cffi:with-foreign-pointer-as-string (buffer 256 len)