[funds-cvs] r127 - trunk/funds/src

[abaine at common-lisp.net]

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)
+  )