projects
/
uffi.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
da7c2a0
)
r2430: *** empty log message ***
author
Kevin M. Rosenberg
<kevin@rosenberg.net>
Wed, 28 Aug 2002 03:29:01 +0000
(
03:29
+0000)
committer
Kevin M. Rosenberg
<kevin@rosenberg.net>
Wed, 28 Aug 2002 03:29:01 +0000
(
03:29
+0000)
uffi.asd
patch
|
blob
|
history
diff --git
a/uffi.asd
b/uffi.asd
index 4ef2cca782fb14b345f60f26d9fd59f8395e72c9..48346e5d17b571a1ec1a8bf97fd0869fb90712f2 100644
(file)
--- a/
uffi.asd
+++ b/
uffi.asd
@@
-7,7
+7,7
@@
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Aug 2002
;;;;
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Aug 2002
;;;;
-;;;; $Id: uffi.asd,v 1.
6 2002/08/26 11:39:53
kevin Exp $
+;;;; $Id: uffi.asd,v 1.
7 2002/08/28 03:29:01
kevin Exp $
;;;;
;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
;;;;
;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
@@
-36,9
+36,11
@@
#-common-lisp-controller "uffi"
"Logical hostname for loading system")
#-common-lisp-controller "uffi"
"Logical hostname for loading system")
-(defclass uffi-cl-source-file (cl-source-file) ())
-(defmethod source-file-type ((c uffi-cl-source-file) (s module))
- "cl")
+(defmethod source-file-type ((c cl-source-file) (s (eql (find-system 'uffi))))
+ "cl")
+
+;(defclass uffi-cl-source-file (cl-source-file) ())
+;(defmethod source-file-type ((c uffi-cl-source-file) (s module)) "cl")
(defsystem uffi
:name "cl-uffi"
(defsystem uffi
:name "cl-uffi"