importJava "org.eclipse.jface.resource.DeviceResourceDescriptor" where
data FontDescriptor
+
+importJava "org.eclipse.jface.resource.ColorDescriptor" where
data ColorDescriptor
importJava "org.eclipse.jface.resource.FontDescriptor" where
@JavaName createFrom
createFontDescriptorFrom :: String -> Integer -> Integer -> FontDescriptor
+importJava "org.simantics.modeling.ColorDescriptorUtil" where
+ colorDescriptorAsHex :: ColorDescriptor -> <Proc> String
+ colorDescriptorAsTuple3 :: ColorDescriptor -> <Proc> (Double, Double, Double)
+ colorDescriptor :: (Double, Double, Double) -> <Proc> ColorDescriptor
+
defaultFontDescriptor = createFontDescriptorFrom "Arial" 12 0
importJava "org.simantics.browsing.ui.content.LabelDecorator" where
importJava "org.simantics.browsing.ui.CheckedState" where
data CheckedState
+ CHECKED :: CheckedState
+ GRAYED :: CheckedState
+ NOT_CHECKED :: CheckedState
importJava "org.simantics.browsing.ui.content.Labeler$Modifier" where
data Modifier
importJava "org.simantics.browsing.ui.model.browsecontexts.BrowseContexts" where
toBrowseContextG :: Vector String -> <ReadGraph> BrowseContext
getNodeContextForResource :: Resource -> <Proc> NodeContext
+ getNodeContextWithTypeForResource :: Resource -> <Proc, ReadGraph> NodeContext
"""
Creates a new BrowseContext for the given Collection of Resources.
instanceOfTest self = do
typeResource = singleObject (represents $ parent self) MOD.InstanceOfTest.HasType
(\r -> isInstanceOf r typeResource)
+
+type BrowseNodeRule a = VariableOrResource -> <ReadGraph,Proc> a
+
\ No newline at end of file