]> gerrit.simantics Code Review - simantics/platform.git/blob - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/FunctionFunctor.scl
Merge commit '31664b6'
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / FunctionFunctor.scl
1 import "Prelude"\r
2 \r
3 //               vvvvvv  mistake, parantheses missing\r
4 instance Functor (->) a where\r
5     map f g x = f (g x)\r
6     \r
7 main = "Not to be executed."\r
8 --\r
9 4:1-5:24: Wrong number of parameters to type class Functor.