init.lisp 978 Bytes
Newer Older
1 2
;; Load GSL
;; Liam Healy Sat Mar  4 2006 - 18:53
Liam Healy's avatar
Liam Healy committed
3
;; Time-stamp: <2008-12-27 09:33:09EST init.lisp>
lhealy's avatar
lhealy committed
4
;; $Id$
5 6 7

(defpackage gsll
  (:nicknames :gsl)
8
  (:use :common-lisp :cffi :cl-utilities))
9 10

(cffi:define-foreign-library libgslcblas
Liam Healy's avatar
Liam Healy committed
11 12 13
  (:darwin
   (:or "/opt/local/lib/libgslcblas.dylib" "/sw/lib/libgslcblas.dylib"
	"/usr/local/lib/libgslcblas.dylib"))
Liam Healy's avatar
Liam Healy committed
14 15
  (:unix (:or "/usr/lib/libgslcblas.so.0" "/usr/lib/libgslcblas.so"
	      "/usr/lib64/libgslcblas.so.0" "/usr/lib64/libgslcblas.so"))
16 17 18 19 20
  (t (:default "libgslcblas")))
   
(cffi:use-foreign-library libgslcblas)

(cffi:define-foreign-library libgsl
Liam Healy's avatar
Liam Healy committed
21 22 23
  (:darwin
   (:or "/opt/local/lib/libgsl.dylib" "/sw/lib/libgsl.dylib"
	"/usr/local/lib/libgsl.dylib"))
Liam Healy's avatar
Liam Healy committed
24 25
  (:unix (:or "/usr/lib/libgsl.so.0" "/usr/lib/libgsl.so"
	      "/usr/lib64/libgsl.so.0" "/usr/lib64/libgsl.so"))
26 27 28
  (t (:default "libgsl")))
   
(cffi:use-foreign-library libgsl)
29 30 31 32

#+sbcl
(eval-when (:compile-toplevel :load-toplevel :execute)
  (pushnew :native *features*))