Author: abaine Date: Fri Aug 10 17:09:14 2007 New Revision: 127 Modified: trunk/funds/src/f-array.lisp Log: Added f-array stubs. Modified: trunk/funds/src/f-array.lisp ============================================================================== --- trunk/funds/src/f-array.lisp (original) +++ trunk/funds/src/f-array.lisp Fri Aug 10 17:09:14 2007 @@ -1,2 +1,11 @@ (in-package :funds) + +(defun make-f-array (size &key (initial-contents nil)) + ) + +(defun f-array-elt (array index) + ) + +(defun f-array-replace (array index item) + )