]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - bundles/org.simantics.structural2/scl/Simantics/Structural.scl
Special RuntimeException to emulate checked exceptions in SCL functions
[simantics/platform.git] / bundles / org.simantics.structural2 / scl / Simantics / Structural.scl
index c27dcf356db5b1ce90def23cb681d8f13ffb5b98..a568a5731ea8a4f5406b303d4b6a544f0b9c5ce2 100644 (file)
@@ -1,12 +1,17 @@
-include "Simantics/Variables"\r
-include "http://www.simantics.org/Layer0-1.1" as L0\r
-include "http://www.simantics.org/Structural-1.2" as STR\r
-\r
-isPartOfUC :: Variable -> <ReadGraph> Boolean\r
-isPartOfUC variable = do\r
-  component = represents variable\r
-  composite = singleObject component L0.PartOf\r
-  existsStatement composite STR.Defines\r
-\r
-\r
-\r
+include "Simantics/Variables"
+include "http://www.simantics.org/Layer0-1.1" as L0
+include "http://www.simantics.org/Structural-1.2" as STR
+
+isPartOfUC :: Variable -> <ReadGraph> Boolean
+isPartOfUC variable = do
+  component = represents variable
+  composite = singleObject component L0.PartOf
+  existsStatement composite STR.Defines
+
+importJava "org.simantics.structural2.variables.Connection" where
+  @JavaName Connection
+  data StructuralConnection
+
+importJava "org.simantics.structural2.utils.StructuralUtils" where
+  structuralConnectionConnectionPoints :: StructuralConnection -> Resource -> <ReadGraph> [Variable]
+  structuralTypeResource :: Variable -> Resource -> <ReadGraph> Resource
\ No newline at end of file