X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=uffi.asd;h=ab174172024a5c567c425e6b151bed791fd74cc9;hb=cc7b3da48f78a00cf62737f447ef9fe05a79bc37;hp=40eb5bedd35ae2757305856d8073e9aaac5474bf;hpb=8dc332f588e5fab803cfdcf94507744e6ef057df;p=uffi.git diff --git a/uffi.asd b/uffi.asd index 40eb5be..ab17417 100644 --- a/uffi.asd +++ b/uffi.asd @@ -7,19 +7,16 @@ ;;;; Author: Kevin M. Rosenberg ;;;; Date Started: Aug 2002 ;;;; -;;;; $Id: uffi.asd,v 1.24 2003/04/29 12:09:36 kevin Exp $ +;;;; $Id$ ;;;; -;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg +;;;; This file, part of UFFI, is Copyright (c) 2002-2005 by Kevin M. Rosenberg ;;;; -;;;; UFFI users are granted the rights to distribute and use this software -;;;; as governed by the terms of the Lisp Lesser GNU Public License -;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;; ************************************************************************* (defpackage #:uffi-system (:use #:asdf #:cl)) (in-package #:uffi-system) -#+(or allegro lispworks cmu mcl cormanlisp sbcl scl) +#+(or allegro lispworks cmu openmcl digitool cormanlisp sbcl scl) (defsystem uffi :name "uffi" :author "Kevin Rosenberg " @@ -28,24 +25,24 @@ :licence "Lessor Lisp General Public License" :description "Universal Foreign Function Library for Common Lisp" :long-description "UFFI provides a universal foreign function interface (FFI) for Common Lisp. UFFI supports CMUCL, Lispworks, and AllegroCL." - + :components ((:module :src :components ((:file "package") (:file "primitives" :depends-on ("package")) - #+mcl (:file "readmacros-mcl" :depends-on ("package")) - (:file "strings" :depends-on ("primitives")) + #+(or openmcl digitool) (:file "readmacros-mcl" :depends-on ("package")) (:file "objects" :depends-on ("primitives")) (:file "aggregates" :depends-on ("primitives")) + (:file "strings" :depends-on ("primitives" "functions" "aggregates" "objects")) (:file "functions" :depends-on ("primitives")) (:file "libraries" :depends-on ("package")) (:file "os" :depends-on ("package")))) )) -#+(or allegro lispworks cmu mcl cormanlisp sbcl scl) -(defmethod perform ((o test-op) (c (eql (find-system :uffi)))) +#+(or allegro lispworks cmu openmcl digitool cormanlisp sbcl scl) +(defmethod perform ((o test-op) (c (eql (find-system 'uffi)))) (oos 'load-op 'uffi-tests) - (oos 'test-op 'uffi-tests)) + (oos 'test-op 'uffi-tests :force t))