Merge commit '5da68e7'

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

class Foo a where\r
    (+) :: a -> a -> a\r
\r
instance Foo Double where\r
    infix 3 (+)\r
    x + y = x\r
--\r
5:5-5:16: Invalid declaration under instance definition.