From: tmtuomas Date: Thu, 6 Apr 2017 07:16:11 +0000 (+0300) Subject: Map some ListUtils functions to SCL (refs #7134). X-Git-Tag: v1.29.0~115 X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=commitdiff_plain;h=47800b949fbb8cc2e260ede0a05c5cbb1a717c66;hp=-c;ds=sidebyside Map some ListUtils functions to SCL (refs #7134). Change-Id: I7307c34dd068af6f3be1032d6e5841d5b3b1c346 --- 47800b949fbb8cc2e260ede0a05c5cbb1a717c66 diff --git a/bundles/org.simantics.scl.db/scl/Simantics/DB.scl b/bundles/org.simantics.scl.db/scl/Simantics/DB.scl index 70b6b97a6..3d71ae514 100644 --- a/bundles/org.simantics.scl.db/scl/Simantics/DB.scl +++ b/bundles/org.simantics.scl.db/scl/Simantics/DB.scl @@ -256,6 +256,22 @@ importJava "org.simantics.db.common.utils.OrderedSetUtils" where importJava "org.simantics.db.common.utils.ListUtils" where @JavaName toList elementsOfList :: Resource -> [Resource] + + @JavaName create + createList :: [Resource] -> Resource + + @javaName insertBack + insertBack :: Resource -> [Resource] -> () + + @javaName removeElement + removeElement :: Resource -> Resource -> Boolean + + @javaName swapWithPrevious + swapWithPrevious :: Resource -> Resource -> Boolean + + @javaName swapWithNext + swapWithNext :: Resource -> Resource -> Boolean + importJava "org.simantics.db.common.utils.CommonDBUtils" where isParent :: Resource -> Resource -> Boolean