Merge commit 'e87f096'

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

import "Prelude"\r
\r
l :: [Integer]\r
l = [2,3]\r
\r
f :: Integer -> <Proc> [Integer]\r
f n = [n] + [0 | i <- l]\r
    \r
main = f 1\r
--\r
[1, 0, 0]