(refs #7250) Support for record syntax for CHR relations

[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / CHR6.scl

diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/CHR6.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/CHR6.scl
index c18a13a5ad8d44535b80b687a6cfa66f84fcebba..f1e28d08a157bfb9ca324cd7ef6ce58c1aee1d93 100644 (file)
--- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/CHR6.scl
+++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/CHR6.scl
@@ -1,8 +1,4 @@
-module {
-    export = [main],
-    chr
-}
-
+module { export = [main], chr }
 import "StandardLibrary"
 
 ruleset RS where
@@ -20,4 +16,8 @@ main = ()
     True     => X 2
     True     => X 1
 --
-()
+A 1
+B 1
+A 2
+B 2
+()
\ No newline at end of file