Enhancements to modelled tests
[simantics/platform.git] / bundles / org.simantics.scl.runtime / scl / Junit / Assert.scl
1 importJava "org.simantics.scl.runtime.utils.AssertionUtils" where
2     assertMultiLineStringEquals :: String -> String -> String -> <Proc> ()
3
4 importJava "org.junit.Assert" where
5     @JavaName assertEquals
6     @private
7     assertDoublesEquals :: String -> Double -> Double -> Double -> <Proc> ()
8     @JavaName assertEquals
9     @private
10     assertLongsEquals :: String -> Long -> Long -> <Proc> ()
11     @JavaName assertEquals
12     assertObjectsEquals :: String -> a -> a -> <Proc> ()
13     
14     assertTrue :: String -> Boolean -> <Proc> ()
15     assertFalse :: String -> Boolean -> <Proc> ()
16
17 class AssertEquals a  where
18     assertEquals :: String -> a -> a -> <Proc> ()
19 instance AssertEquals Long where
20     assertEquals = assertLongsEquals
21
22 class AssertEqualsTolerance a where
23     assertEqualsTolerance :: String -> a -> a -> a -> <Proc> ()
24 instance AssertEqualsTolerance Double where
25     assertEqualsTolerance = assertDoublesEquals