uffi/src strings.lisp,1.6,1.7

Update of /pubcvs/uffi/src
In directory boa.b9.com:/tmp/cvs-serv2538/src

Modified Files:
	strings.lisp 
Log Message:
Auto commit for Debian build

Index: strings.lisp
===================================================================
RCS file: /pubcvs/uffi/src/strings.lisp,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** strings.lisp	12 Mar 2003 21:13:18 -0000	1.6
--- strings.lisp	28 Mar 2003 19:58:18 -0000	1.7
***************
*** 63,67 ****
    #+(or cmu sbcl scl lispworks) (declare (ignore obj))
    #+allegro
!   `(unless (zerop obj)
       (ff:free-fobject ,obj))
    #+mcl
--- 63,67 ----
    #+(or cmu sbcl scl lispworks) (declare (ignore obj))
    #+allegro
!   `(unless (zerop ,obj)
       (ff:free-fobject ,obj))
    #+mcl