blob: 4a625c7ba6fae30af143a866d173320dd80c49fe (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
diff -ur cl-mcclim-0.9.1.orig.orig/mcclim.asd cl-mcclim-0.9.1.orig/mcclim.asd
--- cl-mcclim-0.9.1.orig.orig/mcclim.asd 2005-04-11 01:45:44.000000000 -0500
+++ cl-mcclim-0.9.1.orig/mcclim.asd 2005-04-11 01:46:54.000000000 -0500
@@ -35,16 +35,8 @@
;;; Legacy CMUCL support stuff
#+cmu
(progn
- (unless (fboundp 'ext:stream-read-char)
- (unless (ignore-errors (ext:search-list "gray-streams:"))
- (setf (ext:search-list "gray-streams:")
- '("target:pcl/" "library:subsystems/")))
- (if (fboundp 'extensions:without-package-locks)
- (extensions:without-package-locks
- (load "gray-streams:gray-streams-library"))
- (load "gray-streams:gray-streams-library")))
- #-clx
- (require :clx)
+ (asdf:oos 'asdf:load-op :cmucl-graystream)
+ (asdf:oos 'asdf:load-op :cmucl-clx)
#+mp (when (eq mp::*initial-process* mp::*current-process*)
(format t "~%~%You need to run (mp::startup-idle-and-top-level-loops) to start up the multiprocessing support.~%~%")))
Only in cl-mcclim-0.9.1.orig: mcclim.asd~
|