]> gerrit.simantics Code Review - simantics/platform.git/blob - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/BigContext.scl
Supply SVG text editor with element measurement context
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / BigContext.scl
1 import "Prelude"
2
3 main = do 
4   a1 = 1
5   a2 = 1
6   a3 = 1
7   a4 = 1
8   a5 = 1
9   a6 = 1
10   a7 = 1
11   a8 = 1
12   a9 = 1
13   a10 = 1
14   a11 = 1
15   a12 = 1
16   a13 = 1
17   a14 = 1
18   a15 = 1
19   a16 = 1
20   a17 = 1
21   a18 = 1
22   a19 = 1
23   a20 = 1
24   f x = x + a1 + a2 + a3 + a4 + a5 + a6 + a7 + a8 + a9 + a10 + 
25             a11 + a12 + a13 + a14 + a15 + a16 + a17 + a18 + a19 + a20
26   f 10
27 --
28 30