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

Author: abaine Date: Tue Aug 7 20:58:03 2007 New Revision: 122

Modified: trunk/funds/src/dictionary.lisp Log: Added stubs for dictionary interface.

Modified: trunk/funds/src/dictionary.lisp ============================================================================== --- trunk/funds/src/dictionary.lisp (original) +++ trunk/funds/src/dictionary.lisp Tue Aug 7 20:58:03 2007 @@ -1,3 +1,15 @@

(in-package :funds)

+(defstruct dict + hash-function + test-function + tree) + +(defun make-dictionary (&key hash-function test)) + +(defun dictionary-add (dictionary key value)) + +(defun dictionary-remove (dictionary key)) + +(defun dictionary-lookup (dictionary key))