dictionaries-impl.scm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

(include "indexes.scm")
(include "internals.scm")
(include "externals.scm")

;; register
(let ()
 (include "alist-impl.scm")
 (register-alist!))

(let ()
 (include "plist-impl.scm")
 (register-plist!)) 

(cond-expand
  ((or srfi-69 srfi-125 chibi kawa)
   (begin
     (let ()
      (include "srfi-69-impl.scm")
      (register-srfi-69!))))
  (else))