diff options
Diffstat (limited to 'src/toy_cache.sml')
| -rw-r--r-- | src/toy_cache.sml | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/src/toy_cache.sml b/src/toy_cache.sml index 23dfe4fe..126768b6 100644 --- a/src/toy_cache.sml +++ b/src/toy_cache.sml @@ -1,4 +1,7 @@ -structure ToyCache = struct +structure ToyCache : sig + val cache : Cache.cache +end = struct + (* Mono *) @@ -182,4 +185,10 @@ fun setupQuery {index, params} = val setupGlobal = string "/* No global setup for toy cache. */" + +(* Bundled up. *) + +val cache = {check = check, store = store, flush = flush, + setupQuery = setupQuery, setupGlobal = setupGlobal} + end |