From c82df70302f8ca78868f775f9f2a6c4ef6ba9f9c Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Sat, 13 Oct 2007 18:51:02 +0200
Subject: Support Objective-C code compilation via ASDF.

darcs-hash:ef27415b24423ea9a86ff20f7dde1ca55fa01df1
---
 Lisp/libobjcl.lisp | 12 +++---------
 1 file changed, 3 insertions(+), 9 deletions(-)

(limited to 'Lisp')

diff --git a/Lisp/libobjcl.lisp b/Lisp/libobjcl.lisp
index 1e6d3df..c15282d 100644
--- a/Lisp/libobjcl.lisp
+++ b/Lisp/libobjcl.lisp
@@ -18,15 +18,9 @@
 (in-package #:mulk.objective-cl)
 
 
-(dolist (subdir '("shared_obj" "obj"))
-  (pushnew
-   (merge-pathnames (make-pathname :directory (list
-                                               :relative "Objective-C" subdir)
-                                   :type ""
-                                   :name "")
-                    (asdf:component-pathname (asdf:find-system
-                                              '#:objective-cl)))
-   cffi:*foreign-library-directories*))
+(dolist (subdir '("shared_obj/" "obj/"))
+  (pushnew (merge-pathnames subdir objcl-asdf:*objc-obj-dir*)
+           cffi:*foreign-library-directories*))
 
 (define-foreign-library libobjcl
   (:unix (:or "libobjcl.so"
-- 
cgit v1.2.3