]> gerrit.simantics Code Review - simantics/platform.git/blob - bundles/org.simantics.datatypes/scl/Simantics/BTree.scl
merged svn revision 33114 and added desktop and help plugins
[simantics/platform.git] / bundles / org.simantics.datatypes / scl / Simantics / BTree.scl
1 import "Simantics/DB"\r
2 \r
3 importJava "org.simantics.datatypes.utils.BTree" where\r
4 \r
5     data BTree\r
6     \r
7     @JavaName "<init>"\r
8     createBTree :: Integer -> Resource -> <WriteGraph> BTree\r
9     @JavaName "<init>"\r
10     bTreeOf :: Resource -> <ReadGraph> BTree\r
11     \r
12     rootOfBTree :: BTree -> Resource\r
13     insertBTree :: BTree -> Variant -> Resource -> <WriteGraph> ()\r
14     searchBTree :: BTree -> Variant -> <ReadGraph> Maybe Resource\r
15     removeBTree :: BTree -> Variant -> <WriteGraph> ()\r
16     entriesOfBTree :: BTree -> <ReadGraph> [(Variant, Resource)]\r
17     searchRangeBTree :: BTree -> Maybe Variant -> Maybe Variant -> <ReadGraph> [(Variant, Resource)]\r
18 \r
19     flushCachedBTree :: BTree -> <WriteGraph> ()\r
20 \r
21     @private\r
22     @JavaName "<init>"\r
23     createBTree_ :: Integer -> Resource -> Boolean -> <WriteGraph> BTree\r
24 \r
25     @private\r
26     @JavaName "<init>"\r
27     cachedBTreeOf_ :: Resource -> Boolean -> <ReadGraph> BTree\r
28 \r
29 createCachedBTree :: Integer -> Resource -> <WriteGraph> BTree\r
30 createCachedBTree t tree = createBTree_ t tree True \r
31     \r
32 cachedBTreeOf :: Resource -> <ReadGraph> BTree\r
33 cachedBTreeOf tree = cachedBTreeOf_ tree True