Merge pull request #2 from arvyy/master

Create library, rewrite tests against external api, add alist, plist and srfi69/125 implementation

1 files changed, 55 insertions, 0 deletions

diff --git a/dictionaries.scm b/dictionaries.scm
new file mode 100644
index 0000000..1920f6f
--- /dev/null
+++ b/dictionaries.scm
@@ -0,0 +1,55 @@
+(define-library
+  (dictionaries)
+  (import (scheme base)
+          (scheme case-lambda)
+          (srfi 1))
+  
+  (cond-expand
+    ((and srfi-69 (not srfi-125)) (import (srfi 69)))
+    (srfi-125 (import (srfi 125)))
+    (chibi (import (srfi 125)))
+    (kawa (import (srfi 69 basic-hash-tables))))
+  
+  (export 
+    
+    ;; predicates
+    dictionary?
+    dict-empty?
+    dict-contains?
+    
+    ;; lookup
+    dict-ref
+    dict-ref/default
+    
+    ;; mutation
+    dict-set!
+    dict-adjoin!
+    dict-delete!
+    dict-delete-all!
+    dict-replace!
+    dict-intern!
+    dict-update!
+    dict-update/default!
+    dict-pop!
+    dict-map!
+    dict-filter!
+    dict-remove!
+    dict-search!
+    
+    ;; whole dictionary
+    dict-size
+    dict-for-each
+    dict-count
+    dict-any
+    dict-every
+    dict-keys
+    dict-values
+    dict-entries
+    dict-fold
+    dict-map->list
+    dict->alist
+    
+    ;; registering dictionary types
+    register-dictionary!)
+  
+  (include "dictionaries-impl.scm"))