Commit f88e3e73 authored by ieslick's avatar ieslick
Browse files

Move persistent-collection up in load order 

darcs-hash:59c38aa8f769f2379e8544e1836a1cdb1af2cfb2
parent 6da75963

src/elephant/classes.lisp

+9 −0
Changes for src/elephant/classes.lisp: 9 added lines, 0 removed lines.
Original line number Diff line number Diff line
@@ -71,6 +71,15 @@ 
  (:documentation 

   "Adds a special value slot to store checkout state"))



;;; collection types -- we're slot-less

(defclass persistent-collection (persistent) ()

  (:documentation "Abstract superclass of all collection types."))



;; I don't like having to put this here, as this is only used by

;; the extending class indexed-btree.  But I can't figure out 

;; how to make the :transient flag work on that class without 

;; creating a circularity in the class presidence list...



;; ================================================

;; METACLASS INITIALIZATION 

;; ================================================

src/elephant/collections.lisp

+0 −10
Changes for src/elephant/collections.lisp: 0 added lines, 10 removed lines.
Original line number Diff line number Diff line
@@ -25,16 +25,6 @@ 
#-elephant-without-optimize

(declaim (optimize speed (safety 0) (space 0) (debug 0)))



;;; collection types

;;; we're slot-less

(defclass persistent-collection (persistent) ()

  (:documentation "Abstract superclass of all collection types."))



;; I don't like having to put this here, as this is only used by

;; the extending class indexed-btree.  But I can't figure out 

;; how to make the :transient flag work on that class without 

;; creating a circularity in the class presidence list...



;; 

;; Our workhorse BTree

;;