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"
|
(defsystem "CLASH"
|
||||||
:source-pathname #.(merge-pathnames
|
:source-pathname #.(merge-pathnames
|
||||||
"src/"
|
"src/"
|
||||||
@ -63,5 +54,8 @@
|
|||||||
:depends-on ("base"))
|
:depends-on ("base"))
|
||||||
(:module "driver"
|
(:module "driver"
|
||||||
:source-pathname "drivers"
|
: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"))))
|
:depends-on ("base" "main"))))
|
||||||
|
|||||||
Reference in New Issue
Block a user