syncWrite (\() -> createSTSTest res)\r
()\r
\r
-importJava "org.simantics.tests.ui.TestsUIUtils" where\r
+importJava "org.simantics.tests.modelled.ui.TestsUIUtils" where\r
runSTSTestAction :: Resource -> <Proc> ()\r
\r
createSTSSuiteAction :: Resource -> <Proc> ()\r