+2002-03-31 Kevin Rosenberg (kevin@rosenberg.net)
+
+ * src/strings.cl:
+ Fixed bug in with-foreign-string (Thanks Harald Hanche-Olsen)
+
+ * examples/Makefile:
+ Create a .a library file for FreeBSD
+
2002-03-29 Kevin Rosenberg (kevin@rosenberg.net)
* src/objects.cl:
# Programer: Kevin M. Rosenberg
# Date Started: Mar 2002
#
-# CVS Id: $Id: Makefile,v 1.2 2002/03/21 02:41:30 kevin Exp $
+# CVS Id: $Id: Makefile,v 1.3 2002/03/31 23:05:07 kevin Exp $
#
# This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
#
CC=gcc
SHARED_CC_OPT=-fpic
SHARED_LD_OPT=-shared
+AR=ar
# If you are using Solaris, these are the correct values
# for creating a shared library
#SHARED_CC_OPT=-KPIC
#SHARED_LD_OPT=-G
+
+base=c-test-fns
+
# Nothing to configure beyond this point
+source=$(base).c
+object=$(base).o
+shared_lib=$(base).so
+static_lib=$(base).a
+
+all: $(shared_lib) $(static_lib)
-all: lib
-lib: c-test-fns.so
+$(shared_lib): $(source)
+ $(CC) ${SHARED_CC_OPT} -c $(source) -o $(object)
+ ld ${SHARED_LD_OPT} $(object) -o $(shared_lib)
+ $(AR) r $(static_lib) $(object)
+ rm $(object)
-c-test-fns.so: c-test-fns.c
- ${CC} ${SHARED_CC_OPT} -c c-test-fns.c -o c-test-fns.o
- ld ${SHARED_LD_OPT} c-test-fns.o -o c-test-fns.so
+$(static_lib): $(source)
+ ${CC} -c $(source) -o $(object)
+ $(AR) r $(static_lib) $(object)
+ rm $(object)
clean:
- rm -f *.o *.so
+ rm -f $(object) $(static_lib) $(shared_lib)
-realclean:
- rm -f *.o *.so *~
+realclean: clean
+ rm -f *~
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Mar 2002
;;;;
-;;;; $Id: c-test-fns.cl,v 1.2 2002/03/21 09:54:34 kevin Exp $
+;;;; $Id: c-test-fns.cl,v 1.3 2002/03/31 23:05:07 kevin Exp $
;;;;
;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
(unless (uffi:load-foreign-library
(make-pathname :name "c-test-fns"
- :type #+(or linux unix)"so" #+(or win32 mswindows) "dll"
+ :type #+(or linux unix)"so"
+ #+(or win32 mswindows) "dll"
+ #+freebsd "a"
:defaults *load-truename*)
:supporting-libraries '("c")
:force-load t)
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Feb 2002
;;;;
-;;;; $Id: strings.cl,v 1.14 2002/03/23 17:06:57 kevin Exp $
+;;;; $Id: strings.cl,v 1.15 2002/03/31 23:05:07 kevin Exp $
;;;;
;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
)
(defmacro with-foreign-string ((foreign-string lisp-string) &body body)
- #-(or lispworks cmu)
(let ((result (gensym)))
`(let* ((,foreign-string (convert-to-foreign-string ,lisp-string))
(,result (progn ,@body)))
# Programer: Kevin M. Rosenberg
# Date Started: Mar 2002
#
-# CVS Id: $Id: Makefile,v 1.2 2002/03/21 02:41:30 kevin Exp $
+# CVS Id: $Id: Makefile,v 1.3 2002/03/31 23:05:07 kevin Exp $
#
# This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
#
CC=gcc
SHARED_CC_OPT=-fpic
SHARED_LD_OPT=-shared
+AR=ar
# If you are using Solaris, these are the correct values
# for creating a shared library
#SHARED_CC_OPT=-KPIC
#SHARED_LD_OPT=-G
+
+base=c-test-fns
+
# Nothing to configure beyond this point
+source=$(base).c
+object=$(base).o
+shared_lib=$(base).so
+static_lib=$(base).a
+
+all: $(shared_lib) $(static_lib)
-all: lib
-lib: c-test-fns.so
+$(shared_lib): $(source)
+ $(CC) ${SHARED_CC_OPT} -c $(source) -o $(object)
+ ld ${SHARED_LD_OPT} $(object) -o $(shared_lib)
+ $(AR) r $(static_lib) $(object)
+ rm $(object)
-c-test-fns.so: c-test-fns.c
- ${CC} ${SHARED_CC_OPT} -c c-test-fns.c -o c-test-fns.o
- ld ${SHARED_LD_OPT} c-test-fns.o -o c-test-fns.so
+$(static_lib): $(source)
+ ${CC} -c $(source) -o $(object)
+ $(AR) r $(static_lib) $(object)
+ rm $(object)
clean:
- rm -f *.o *.so
+ rm -f $(object) $(static_lib) $(shared_lib)
-realclean:
- rm -f *.o *.so *~
+realclean: clean
+ rm -f *~
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Mar 2002
;;;;
-;;;; $Id: c-test-fns.cl,v 1.2 2002/03/21 09:54:34 kevin Exp $
+;;;; $Id: c-test-fns.cl,v 1.3 2002/03/31 23:05:07 kevin Exp $
;;;;
;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
(unless (uffi:load-foreign-library
(make-pathname :name "c-test-fns"
- :type #+(or linux unix)"so" #+(or win32 mswindows) "dll"
+ :type #+(or linux unix)"so"
+ #+(or win32 mswindows) "dll"
+ #+freebsd "a"
:defaults *load-truename*)
:supporting-libraries '("c")
:force-load t)