greg/mentat
1
0
Fork 0
Code Issues 294 Pull requests Packages Projects Releases 9 Wiki Activity

Add caching example to Seattle fixture.

Browse source
This commit is contained in:
Richard Newman 2018-02-21 13:42:50 -08:00
parent f42ae35b70
commit a0c70a7cd9
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
fixtures/seattle.script
View file

@ -18,3 +18,11 @@
.q [:find ?n . :where [(fulltext $ :community/name "Wallingford") [[?e ?n]]]]
.q [:find [?when ...] :where [_ :db/txInstant ?when] :order (asc ?when)]
.cache :neighborhood/name reverse
.cache :neighborhood/district forward
.q [:find ?district :where
[?neighborhood :neighborhood/name "Beacon Hill"]
[?neighborhood :neighborhood/district ?d]
[?d :district/name ?district]]