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%2FInvalidTypeClassInstance1.scl;h=009046f244f5637c16255d55d8248d9135bc59e0;hb=b2676209b072592da3425c2efb29f51eb5c4a0e0;hp=8860c3b01a3d31149f9c17ec020e9d08d4ec9e16;hpb=c125a1755cc7c4a6241c3c5bf841c3db0ff2d658;p=simantics%2Fplatform.git diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/InvalidTypeClassInstance1.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/InvalidTypeClassInstance1.scl index 8860c3b01..009046f24 100644 --- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/InvalidTypeClassInstance1.scl +++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/InvalidTypeClassInstance1.scl @@ -1,9 +1,9 @@ - -class Foo a where - foo :: a -> Integer - -instance Foo Long where - foo x = x - --- + +class Foo a where + foo :: a -> Integer + +instance Foo Long where + foo x = x + +-- 6:13-6:14: Expected got . \ No newline at end of file