]> gerrit.simantics Code Review - simantics/platform.git/blob - bundles/org.simantics.scl.osgi/scl/UI/Progress.scl
f09d49d48c2f7d0ac598750de7e9b6e5b90048bb
[simantics/platform.git] / bundles / org.simantics.scl.osgi / scl / UI / Progress.scl
1 importJava "org.eclipse.core.runtime.IProgressMonitor" where
2     data ProgressMonitor
3     
4     beginTask :: ProgressMonitor -> String -> Integer -> <Proc> ()
5     worked :: ProgressMonitor -> Integer -> <Proc> ()    
6     done :: ProgressMonitor -> <Proc> ()
7     isCanceled :: ProgressMonitor -> Boolean
8     setCanceled :: ProgressMonitor -> Boolean -> <Proc> ()
9     subTask :: ProgressMonitor -> String -> <Proc> ()
10
11 importJava "org.eclipse.core.runtime.SubMonitor" where
12     data SubMonitor
13
14     @JavaName convert
15     convertMonitor :: ProgressMonitor -> Integer -> <Proc> SubMonitor
16     newChild :: SubMonitor -> Integer -> <Proc> ProgressMonitor
17
18 importJava "org.eclipse.core.runtime.NullProgressMonitor" where
19     @JavaName "<init>"
20     createNullProgressMonitor :: () -> <Proc> ProgressMonitor
21
22 importJava "org.simantics.scl.osgi.SCLProgressMonitor" where
23     @JavaName "<init>"
24     sclProgressMonitor :: (String -> Float -> <Proc> ()) -> (() -> <Proc> ()) -> (() -> <Proc> Boolean) -> (Boolean -> <Proc> ()) -> (String -> <Proc> ()) -> (String -> <Proc> ()) -> (Float -> <Proc> ()) -> <Proc> ProgressMonitor