X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=bundles%2Forg.simantics.scl.compiler%2Fscl%2FSCL%2FCommandSession.scl;fp=bundles%2Forg.simantics.scl.compiler%2Fscl%2FSCL%2FCommandSession.scl;h=33b4dd7fcaa6982fcf6175a9cc85c7c1dc5f6878;hp=0000000000000000000000000000000000000000;hb=08a43c849e0bed256394e3861326af9ce26a9917;hpb=fcb5a762af707ecef245fb3b83a36e8b24bc4b47

diff --git a/bundles/org.simantics.scl.compiler/scl/SCL/CommandSession.scl b/bundles/org.simantics.scl.compiler/scl/SCL/CommandSession.scl
new file mode 100644
index 000000000..33b4dd7fc
--- /dev/null
+++ b/bundles/org.simantics.scl.compiler/scl/SCL/CommandSession.scl
@@ -0,0 +1,19 @@
+// This module is meant to be imported with namespace
+import "SCL/ModuleRepository"
+import "SafeDynamic"
+
+importJava "org.simantics.scl.compiler.commands.CommandSession" where
+    data CommandSession
+    
+    @JavaName "<init>"
+    create :: ModuleRepository -> <Proc> CommandSession
+
+    execute :: CommandSession -> String -> <Proc> ()
+    
+    @JavaName getVariableValueAndType
+    get :: CommandSession -> String -> <Proc> Maybe SafeDynamic
+    @JavaName setVariable
+    set :: CommandSession -> String -> SafeDynamic -> <Proc> ()
+    
+    @JavaName removeVariable
+    remove :: CommandSession -> String -> <Proc> ()
\ No newline at end of file