SCLProgressMonitor implements IProgressMonitor
[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.NullProgressMonitor" where
12     @JavaName "<init>"
13     createNullProgressMonitor :: () -> <Proc> ProgressMonitor
14
15 importJava "org.simantics.scl.osgi.SCLProgressMonitor" where
16     @JavaName "<init>"
17     sclProgressMonitor :: (String -> Float -> <Proc> ()) -> (() -> <Proc> ()) -> (() -> <Proc> Boolean) -> (Boolean -> <Proc> ()) -> (String -> <Proc> ()) -> (String -> <Proc> ()) -> (Float -> <Proc> ()) -> <Proc> ProgressMonitor