[cells-cvs] CVS update: cell-cultures/ffi-extender/arrays.lisp - cells-cvs@common-lisp.net - mailman3.common-lisp.net

18 Oct 2004

Update of /project/cells/cvsroot/cell-cultures/ffi-extender
In directory common-lisp.net:/tmp/cvs-serv12927/ffi-extender
Modified Files:
    arrays.lisp 
Log Message:
Delete copy of celtic mainly
Date: Tue Oct 19 05:47:38 2004
Author: ktilton
Index: cell-cultures/ffi-extender/arrays.lisp
diff -u cell-cultures/ffi-extender/arrays.lisp:1.1 cell-cultures/ffi-extender/arrays.lisp:1.2

--- cell-cultures/ffi-extender/arrays.lisp:1.1	Sat Jun 26 20:38:42 2004
+++ cell-cultures/ffi-extender/arrays.lisp	Tue Oct 19 05:47:37 2004
@@ -79,8 +79,6 @@
             (,ptr (uffi:allocate-foreign-object ,type ,amt)))
        (call-fgn-alloc ,type ,amt ,ptr (list ,@keys)))))
-
-
 (defun call-fgn-alloc (type amt ptr keys)
   ;;(print `(fgnalloc ,type ,amt ,keys))
   (fgn-ptr (car (push (make-fgn :id keys

    