(index ("make-dict" 0) ("alist->dict" 310) ("dict?" 645) ("dict-equivalence-function" 747) ("dict-count" 931) ("dict-keys" 1059) ("dict-values" 1172) ("dict->alist" 1291) ("dict-ref" 1450) ("dict-indempotent-ref!" 1669) ("dict-exists?" 2086) ("dict-set!" 2236) ("dict-update!" 2426) ("dict-update-list!" 2971) ("dict-update-dict!" 3191) ("dict-delete!" 3487) ("dict-for-each" 3627) ("dict-merge!" 3840) ("dict-search" 4074) ("dict-print" 4371))
(def (sig (procedure "(make-dict [EQUALITY [ESTIMATE]]) -> dict" (id make-dict))) (p "Returns a dictionary using the supplied " (tt "EQUALITY") " test, optimized for the number of elements " (tt "ESTIMATE") ".") (dl (dt (tt "EQUALITY")) (dd (tt "procedure") " ; eq?") (dt (tt "ESTIMATE")) (dd (tt "fixnum"))))
(def (sig (procedure "(alist->dict ALIST EQUALITY [ESTIMATE]) -> dict" (id alist->dict))) (p "Returns a dictionary constructed from " (tt "ALIST") " using the supplied " (tt "EQUALITY") " test, and optional " (tt "ESTIMATE") ".") (dl (dt (tt "EQUALITY")) (dd (tt "procedure") " ; eq?") (dt (tt "ESTIMATE")) (dd (tt "fixnum") " ; 0")))
(def (sig (procedure "(dict? OBJ) -> boolean" (id dict?))) (p "Is the " (tt "OBJ") " a dictionary?"))
(def (sig (procedure "(dict-equivalence-function DICT) -> (* * --> boolean)" (id dict-equivalence-function))) (p "Returns the equality test predicate procedure for " (tt "DICT") "."))
(def (sig (procedure "(dict-count DICT) -> fixnum" (id dict-count))) (p "Returns the number of items in the " (tt "DICT") "."))
(def (sig (procedure "(dict-keys DICT) -> list" (id dict-keys))) (p "Returns the keys in the " (tt "DICT") "."))
(def (sig (procedure "(dict-values DICT) -> list" (id dict-values))) (p "Returns the values in the " (tt "DICT") "."))
(def (sig (procedure "(dict->alist DICT) -> list" (id dict->alist))) (p "Returns the " (tt "DICT") " as an association list. The result may not be mutated!"))
(def (sig (procedure "(dict-ref DICT KEY [DEF]) -> *" (id dict-ref))) (p "Returns the value associated with " (tt "KEY") " in the " (tt "DICT") ", otherwise " (tt "DEF") ".") (dl (dt (tt "DEF")) (dd (tt "*") " ; #f")))
(def (sig (procedure "(dict-indempotent-ref! DICT KEY FUNC [DEF]) -> *" (id dict-indempotent-ref!))) (p "Should a value for " (tt "KEY") " exist in " (tt "DICT") " it is returned. Otherwise " (tt "FUNC") " is invoked on " (tt "DEF") ". Any result other than " (tt "DEF") " is the value for the " (tt "KEY") " and that value is returned. Otherwise returns " (tt "DEF") ".") (dl (dt (tt "DEF")) (dd (tt "*") " ; #f")))
(def (sig (procedure "(dict-exists? DICT KEY) -> boolean" (id dict-exists?))) (p "Does an entry with " (tt "KEY") " exist in the " (tt "DICT") " ?"))
(def (sig (procedure "(dict-set! DICT KEY VAL)" (id dict-set!))) (p "Associate " (tt "VAL") " with " (tt "KEY") " in the " (tt "DICT") ".") (p (tt "VAL") " must not be " (tt "(void)") "!"))
(def (sig (procedure "(dict-update! DICT KEY DEF-VAL-PROCEDURE [FUNC])" (id dict-update!))) (p "Invokes " (tt "FUNC") " on either the existing value for " (tt "KEY") " in the " (tt "DICT") ", or the result of the " (tt "DEF-VAL-PROCEDURE") " when no existing value. The result then becomes the value for " (tt "KEY") " in the " (tt "DICT") ".") (p "Returns the updated value for " (tt "KEY") " in the " (tt "DICT") ".") (dl (dt (tt "FUNC")) (dd (tt "(* -> *)") " ; identity")) (p (tt "DEF-VAL-PROCEDURE") " must not return " (tt "(void)") "!"))
(def (sig (procedure "(dict-update-list! DICT KEY OBJ ...)" (id dict-update-list!))) (p "Updates the value for " (tt "KEY") " in the " (tt "DICT") " with the OBJ list.") (dl (dt (tt "OBJ ...")) (dd (tt "(list-of *)"))))
(def (sig (procedure "(dict-update-dict! DICT KEY [EQUALITY [ESTIMATE]])" (id dict-update-dict!))) (p "Updates the value for " (tt "KEY") " in the " (tt "DICT") " with a " (tt "dict") ".") (dl (dt (tt "EQUALITY")) (dd (tt "procedure") " ; " (tt "eq?") "; " (tt "ESTIMATE") " : " (tt "fixnum"))))
(def (sig (procedure "(dict-delete! DICT KEY)" (id dict-delete!))) (p "Removes any association of " (tt "KEY") " in the " (tt "DICT") "."))
(def (sig (procedure "(dict-for-each DICT PROC))" (id dict-for-each))) (p "Invokes the supplied " (tt "PROC") " with each association in the " (tt "DICT") ".") (dl (dt (tt "PROC")) (dd (tt "(KEY VAL -> void)"))))
(def (sig (procedure "(dict-merge! DICT DICT1 ...) -> dict" (id dict-merge!))) (p "Returns the " (tt "DICT") " as the " (tt "(union DICT DICT1 ...)") " using overwrite semantics.") (p "Tables must have the same equality predicate!"))
(def (sig (procedure "(dict-search DICT PRED [DEF]) -> *" (id dict-search))) (p "Returns the first entry value matched by the " (tt "PRED") ". Otherwise the " (tt "DEF") " value is returned.)") (dl (dt (tt "PRED")) (dd (tt "(KEY VAL --> boolean)")) (dt (tt "DEF")) (dd (tt "*") " ; " (tt "#f"))))
(def (sig (procedure "(dict-print DICT [PORT])" (id dict-print))) (p "Pretty-print " (tt "DICT") " to " (tt "PORT") ".") (dl (dt (tt "PORT")) (dd (tt "output-port") " ; " (tt "(current-output-port)"))))
