Added a version of the simple CMUCL driver that uses SERVE-EVENT, for
all versions of CMUCL that don't provide multi-processing support, like on all non-x86 platforms. Tested on an UltraSparc running Solaris 2.7 (hawk) and a mid-1999 version of CMUCL 18b+.
This commit is contained in:
14
CLASH.system
14
CLASH.system
@ -14,15 +14,6 @@
|
||||
;;;;
|
||||
;;;;
|
||||
|
||||
#+NIL
|
||||
(defsystem "CLASH-SYS"
|
||||
:source-pathname "src/sys"
|
||||
:source-extension "cl"
|
||||
:components
|
||||
((:file "package")
|
||||
(:file "mp" :depends-on ("package"))
|
||||
(:file "socket" :depends-on ("package"))))
|
||||
|
||||
(defsystem "CLASH"
|
||||
:source-pathname #.(merge-pathnames
|
||||
"src/"
|
||||
@ -63,5 +54,8 @@
|
||||
:depends-on ("base"))
|
||||
(:module "driver"
|
||||
:source-pathname "drivers"
|
||||
:components (#+CMU (:file "simple-cmu"))
|
||||
:components (#+(and :CMU :MP (not :CLASH-EVENT))
|
||||
(:file "simple-cmu")
|
||||
#+(or :CLASH-EVENT (and :CMU (not :MP)))
|
||||
(:file "event-cmu"))
|
||||
:depends-on ("base" "main"))))
|
||||
|
||||
Reference in New Issue
Block a user