X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=tests%2Forg.simantics.scl.compiler.tests%2Fsrc%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Ftests%2Fscl%2FCHR6.scl;h=f1e28d08a157bfb9ca324cd7ef6ce58c1aee1d93;hb=862c09c9608329f326404342d12da61792eece2c;hp=c18a13a5ad8d44535b80b687a6cfa66f84fcebba;hpb=fad36d463b75c3a9944d875fc627c3533f6da74d;p=simantics%2Fplatform.git 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 c18a13a5a..f1e28d08a 100644 --- 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