X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.modeling%2Fscl%2FSimantics%2FIssue.scl;fp=bundles%2Forg.simantics.modeling%2Fscl%2FSimantics%2FIssue.scl;h=41e955cd5a2ad7c1a2c3bec6cc8015df3f7e0f8c;hb=0ffcb1180dcccf28e66a391338885be224ba1c47;hp=e09297750d680e90d2bc55081e285d6d3f12fa45;hpb=342a2b006b88330280060c16c2ab50374468a4c6;p=simantics%2Fplatform.git diff --git a/bundles/org.simantics.modeling/scl/Simantics/Issue.scl b/bundles/org.simantics.modeling/scl/Simantics/Issue.scl index e09297750..41e955cd5 100644 --- a/bundles/org.simantics.modeling/scl/Simantics/Issue.scl +++ b/bundles/org.simantics.modeling/scl/Simantics/Issue.scl @@ -1,5 +1,6 @@ include "Simantics/Entity" hiding (nameOf) import "Simantics/Model" +import "UI/Progress" import "http://www.simantics.org/Issue-1.2" as ISSUE type Issue = Resource @@ -25,4 +26,20 @@ userIssueAdvanced model label severity contexts = do importJava "org.simantics.issues.common.IssueUtils" where @JavaName newUserIssueForModel - userIssue :: () -> Issue \ No newline at end of file + userIssue :: () -> Issue + +importJava "org.simantics.db" where + @JavaName Issue + data IssueI + +importJava "org.simantics.db.layer0.validation.ValidationUtils" where + @JavaName validateConstraintsForDomain + validateDomain :: Resource -> [IssueI] + +importJava "org.simantics.modeling.utils.BatchValidations" where + @JavaName runAll + runAllBatchValidations :: ProgressMonitor -> Resource -> Resource -> () + +importJava "org.simantics.issues.common.RunActiveValidations" where + @JavaName run + runActiveValidations :: ProgressMonitor -> Resource -> () \ No newline at end of file