X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=org.simantics.interop.scl%2Fscl%2FInterop%2FFunctionRegistry.scl;fp=org.simantics.interop.scl%2Fscl%2FInterop%2FFunctionRegistry.scl;h=bdba0e3c46db34ade61473e89ddd1149b071fa76;hb=66cdd1aef47bb1209a0e727dab409b98f6d100b4;hp=9d707cfdb5fe768b8510587d62d031f53d50a9c9;hpb=14d4d6b020af5777afe37ec990c8fb8661f0bd14;p=simantics%2Finterop.git

diff --git a/org.simantics.interop.scl/scl/Interop/FunctionRegistry.scl b/org.simantics.interop.scl/scl/Interop/FunctionRegistry.scl
index 9d707cf..bdba0e3 100644
--- a/org.simantics.interop.scl/scl/Interop/FunctionRegistry.scl
+++ b/org.simantics.interop.scl/scl/Interop/FunctionRegistry.scl
@@ -19,4 +19,15 @@ importJava "org.simantics.interop.scl.FunctionRegistry" where
   clear :: a -> <Proc> ()
   
   @JavaName clear
-  clearName :: a -> String -> <Proc> ()
\ No newline at end of file
+  clearName :: a -> String -> <Proc> ()
+  
+  @JavaName clear
+  clearFunction :: a -> String -> (f -> <Proc>()) -> <Proc> ()
+  @JavaName clear
+  clearFunction1 :: a -> String -> (f -> b -> <Proc>()) -> <Proc> ()
+  @JavaName clear
+  clearFunction2 :: a -> String -> (f -> b -> c -> <Proc>()) -> <Proc> ()
+  @JavaName clear
+  clearFunction3 :: a -> String -> (f -> b -> c -> d -> <Proc>()) -> <Proc> ()
+  @JavaName clear
+  clearFunction4 :: a -> String -> (f -> b -> c -> d -> e -> <Proc>()) -> <Proc> ()
\ No newline at end of file