|
Last change
on this file was 6, checked in by Gary Byers, 21 years ago |
|
Initial revision
|
-
Property svn:eol-style
set to
native
-
Property svn:keywords
set to
Author Date Id Revision
|
|
File size:
537 bytes
|
| Line | |
|---|
| 1 | ;;; File to fix Irritating Impedance Mismatch between
|
|---|
| 2 | ;;; CMU CL Hemlock and PortableHemlock.
|
|---|
| 3 |
|
|---|
| 4 | #+cmu
|
|---|
| 5 | (unless (find-package :hemlock-ext)
|
|---|
| 6 | #-hemlock
|
|---|
| 7 | (progn
|
|---|
| 8 | (load "/usr/share/common-lisp/systems/cmucl-hemlock.system")
|
|---|
| 9 | (mk:oos :cmucl-hemlock :load))
|
|---|
| 10 |
|
|---|
| 11 | ;; OK, here comes the nasty. CMUCLHemlock stuffs things in the "EXT"
|
|---|
| 12 | ;; package (system-dependent stuff, basically). We expect things to be
|
|---|
| 13 | ;; orderly and live in a Hemlock package. Thus:
|
|---|
| 14 | (common-lisp::enter-new-nicknames (find-package "EXTENSIONS") '("HEMLOCK-EXT")))
|
|---|
| 15 |
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
