Change function to macro

diff --git a/debian/changelog b/debian/changelog
index 6086e5d225257edaab1f13e4fa972f093e27dd92..b8f44524f1c4619cc79b0b9147097a630010f833 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+cl-uffi (2.1.1-1) unstable; urgency=low
+
+  * New upstream
+
+ -- Kevin M. Rosenberg <kmr@debian.org>  Mon, 19 Dec 2011 10:35:50 -0700
+
 cl-uffi (2.1.0-1) unstable; urgency=low
 
   * New upstream

diff --git a/src/strings.lisp b/src/strings.lisp
index 4f2eae3c7e430456dd4355b8462fddedefe58eba..834d251b2620ffc09888dfdb98507fc2924e42b6 100644 (file)
--- a/src/strings.lisp
+++ b/src/strings.lisp
@@ -393,7 +393,7 @@ that LW/CMU automatically converts strings from c-calls."
   `(new-ptr ,size)
   )
 
-(defun foreign-string-length (foreign-string)
+(defmacro foreign-string-length (foreign-string)
   #+allegro `(ff:foreign-strlen ,foreign-string)
   #-allegro
   `(loop