]> gerrit.simantics Code Review - simantics/platform.git/blob - bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Record1.scl
List the unsatisfied dependencies in CanvasContext
[simantics/platform.git] / bundles / org.simantics.scl.compiler / tests / org / simantics / scl / compiler / tests / scl / Record1.scl
1 import "Prelude"\r
2 \r
3 data XYS = XYS { x :: Double, y :: Double, s :: String }\r
4 \r
5 len XYS {x = x, y = y} = sqrt (x*x + y*y)\r
6 \r
7 main = len (XYS { x = 4, y = 3, s = "Hello world!" })\r
8 -- \r
9 5.0