importJava "org.eclipse.core.runtime.IProgressMonitor" where
    data ProgressMonitor
    
    beginTask :: ProgressMonitor -> String -> Integer -> <Proc> ()
    worked :: ProgressMonitor -> Integer -> <Proc> ()    
    done :: ProgressMonitor -> <Proc> ()
    isCanceled :: ProgressMonitor -> Boolean
    setCanceled :: ProgressMonitor -> Boolean -> <Proc> ()
    subTask :: ProgressMonitor -> String -> <Proc> ()

importJava "org.eclipse.core.runtime.NullProgressMonitor" where
    @JavaName "<init>"
    createNullProgressMonitor :: () -> <Proc> ProgressMonitor

importJava "org.simantics.scl.osgi.SCLProgressMonitor" where
    @JavaName "<init>"
    sclProgressMonitor :: (String -> Float -> <Proc> ()) -> (() -> <Proc> ()) -> (() -> <Proc> Boolean) -> (Boolean -> <Proc> ()) -> (String -> <Proc> ()) -> (String -> <Proc> ()) -> (Float -> <Proc> ()) -> <Proc> ProgressMonitor