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%2FRepeatedVariableInPattern.scl;h=3d0ce251a3f391be9a5decbabaa3a13733f58fd9;hb=2148e9b3fecb3385ac71f302eea7045cf370afe2;hp=8e5cf084c748e19749f7393b7115286bc85ea067;hpb=f23dc81afe57e77d20706a9a94002ce4c72f670d;p=simantics%2Fplatform.git diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/RepeatedVariableInPattern.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/RepeatedVariableInPattern.scl index 8e5cf084c..3d0ce251a 100644 --- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/RepeatedVariableInPattern.scl +++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/RepeatedVariableInPattern.scl @@ -1,6 +1,6 @@ -invalidProject :: (a,a) -> a -invalidProject (a,a) = a - -main = "Not to be executed!" --- +invalidProject :: (a,a) -> a +invalidProject (a,a) = a + +main = "Not to be executed!" +-- 2:19-2:20: Repeated variable a in pattern. \ No newline at end of file