tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/BigContext.scl

   1 import "Prelude"\r
   2 \r
   3 main = do \r
   4   a1 = 1\r
   5   a2 = 1\r
   6   a3 = 1\r
   7   a4 = 1\r
   8   a5 = 1\r
   9   a6 = 1\r
  10   a7 = 1\r
  11   a8 = 1\r
  12   a9 = 1\r
  13   a10 = 1\r
  14   a11 = 1\r
  15   a12 = 1\r
  16   a13 = 1\r
  17   a14 = 1\r
  18   a15 = 1\r
  19   a16 = 1\r
  20   a17 = 1\r
  21   a18 = 1\r
  22   a19 = 1\r
  23   a20 = 1\r
  24   f x = x + a1 + a2 + a3 + a4 + a5 + a6 + a7 + a8 + a9 + a10 + \r
  25             a11 + a12 + a13 + a14 + a15 + a16 + a17 + a18 + a19 + a20\r
  26   f 10\r
  27 --\r
  28 30