Fixed all line endings of the repository
[simantics/platform.git] / bundles / org.simantics.tests.modelled.ui / scl / Simantics / TestsUI.scl
1 include "Simantics/Tests"
2
3 createSTSTestAction :: Resource -> <Proc> ()
4 createSTSTestAction res = do
5   syncWrite (\() -> createSTSTest res)
6   ()
7
8 importJava "org.simantics.tests.modelled.ui.TestsUIUtils" where
9     runSTSTestAction :: Resource -> <Proc> ()
10     
11 createSTSSuiteAction :: Resource -> <Proc> ()
12 createSTSSuiteAction res = do
13   syncWrite (\() -> createSTSSuite res)
14   ()