/[rjain-utils]/tables/array-classes.lisp
ViewVC logotype

Contents of /tables/array-classes.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1.1.1 - (show annotations) (vendor branch)
Sun Mar 28 17:21:12 2004 UTC (10 years ago) by rjain
Branch: MAIN, rjain
CVS Tags: start, HEAD
Changes since 1.1: +0 -0 lines
Initial import
1 (in-package :rjain.tables)
2
3 (defclass array-table (contiguous-table)
4 ((key-type :allocation :class
5 :initform 'fixnum)
6 (min-index :allocation :class
7 :initform 0)
8 (ordering-predicate :allocation :class
9 :initform '<)
10 (initial-element :initform nil
11 :accessor table-initial-element)
12 (data)))

  ViewVC Help
Powered by ViewVC 1.1.5