deregisters the memoize function

(deregister-memoize -inc-)

creates a memoize form template for definvoke

(invoke-intern-memoize :memoize ’hello {} ’(x x))

caches the result of a function (ns-unmap ns ’+-inc-) (ns-unmap ns ‘-inc-) (def +-inc- (atom {})) (declare -inc-) (def -inc- (memoize inc +-inc- #’-inc-))

(-inc- 1) => 2 (-inc- 2) => 3

clears all results

(memoize:clear -inc-) => ’{(2) 3}

disables the usage of the cache

(memoize:disable -inc-) => :disabled

checks if the memoized function is disabled

(memoize:disabled? -inc-) => true

enables the usage of the cache

(memoize:enable -inc-) => :enabled

checks if the memoized function is disabled

(memoize:enabled? -inc-) => true

formats the memoize object

(def +-plus- (atom {})) (declare -plus-) (def -plus- (memoize + +-plus- #’-plus-)) (memoize:info -plus-) => (contains {:status :enabled, :registered false, :items number?}) ;; {:fn +, :cache #atom {(1 1) 2}}

invokes the function with arguments

(memoize:invoke -plus- 1 2 3) => 6

removes a cached result

(memoize:remove -inc- 1) => 2

returns the status of the object

(memoize:status -inc-) => :enabled

registers the memoize function

(register-memoize -inc-)

checks if a memoize function is registered

(registered-memoize? -mem-) => false

lists all registered memoizes

(registered-memoizes)