Migrated source code from Simantics SVN

[simantics/platform.git] / bundles / org.simantics.graphviz / scl / Visualization / Graphviz / AbstractTypes.scl

diff --git a/bundles/org.simantics.graphviz/scl/Visualization/Graphviz/AbstractTypes.scl b/bundles/org.simantics.graphviz/scl/Visualization/Graphviz/AbstractTypes.scl
new file mode 100644 (file)
index 0000000..5eb071a
--- /dev/null
+++ b/bundles/org.simantics.graphviz/scl/Visualization/Graphviz/AbstractTypes.scl
@@ -0,0 +1,10 @@
+\r
+importJava "org.simantics.graphviz.IGraph" where\r
+    data IGraph\r
+importJava "org.simantics.graphviz.Identifiable" where\r
+    data Identifiable\r
+    \r
+class Identifiable a where\r
+    identifiable :: a -> Identifiable\r
+class IGraph a where\r
+    iGraph :: a -> IGraph
\ No newline at end of file