X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.scl.compiler%2Ftests%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Ftests%2Fscl%2FEquality.scl;fp=bundles%2Forg.simantics.scl.compiler%2Ftests%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Ftests%2Fscl%2FEquality.scl;h=0000000000000000000000000000000000000000;hb=a8758de5bc19e5adb3f618d3038743a164f09912;hp=acf00e936952339869cf08c4ee1d39e27c7a7f59;hpb=12d9af17384d960b75d58c3935d2b7b46d93e87b;p=simantics%2Fplatform.git diff --git a/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Equality.scl b/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Equality.scl deleted file mode 100644 index acf00e936..000000000 --- a/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Equality.scl +++ /dev/null @@ -1,41 +0,0 @@ -import "Prelude" - -main = """ -\(newEq () ()) -\(newEq True True) -\(newEq False False) -\(newEq True False) -\(newEq False True) -\(newEq (1::Integer) (1::Integer)) -\(newEq (1::Integer) (2::Integer)) -\(newEq (1::Long) (1::Long)) -\(newEq (1::Long) (2::Long)) -\(newEq (1::Double) (1::Double)) -\(newEq (1::Double) (2::Double)) -\(newEq "a" "a") -\(newEq "a" "b") -\(newEq (Just "a") (Just "a")) -\(newEq (Just "a") (Just "b")) -\(newEq Nothing Nothing) -\(newEq (Just "a") Nothing) -\(newEq Nothing (Just "a")) -""" --- -True -True -True -False -False -True -False -True -False -True -False -True -False -True -False -True -False -False \ No newline at end of file