summary refs log tree commit diff stats
path: root/tests/compile/tloops.nim
diff options
context:
space:
mode:
authorAraq <rumpf_a@web.de>2011-11-19 15:45:51 +0100
committerAraq <rumpf_a@web.de>2011-11-19 15:45:51 +0100
commita274f3bf5be3fc35f1538e5aab0e32fb9ed2ff82 (patch)
tree95dc5bf7fe3716a3ab266f78094fccce38c94ccf /tests/compile/tloops.nim
parentd0772feb08baaea12bfdad0a7c20a41733f977bd (diff)
downloadNim-a274f3bf5be3fc35f1538e5aab0e32fb9ed2ff82.tar.gz
got rid of 'accept' dir in the tests
Diffstat (limited to 'tests/compile/tloops.nim')
-rwxr-xr-xtests/compile/tloops.nim64
1 files changed, 64 insertions, 0 deletions
diff --git a/tests/compile/tloops.nim b/tests/compile/tloops.nim
new file mode 100755
index 000000000..74a3992c9
--- /dev/null
+++ b/tests/compile/tloops.nim
@@ -0,0 +1,64 @@
+# Test nested loops and some other things

+

+proc andTest() =

+  var a = 0 == 5 and 6 == 6

+

+proc incx(x: var int) = # is built-in proc

+  x = x + 1

+

+proc decx(x: var int) =

+  x = x - 1

+

+proc First(y: var int) =

+  var x: int

+  i_ncx(x)

+  if x == 10:

+    y = 0

+  else:

+    if x == 0:

+      incx(x)

+    else:

+      x=11

+

+proc TestLoops() =

+  var i, j: int

+  while i >= 0:

+    if i mod 3 == 0:

+      break

+    i = i + 1

+    while j == 13:

+      j = 13

+      break

+    break

+

+  while True:

+    break

+

+

+proc Foo(n: int): int =

+    var

+        a, old: int

+        b, c: bool

+    F_irst(a)

+    if a == 10:

+        a = 30

+    elif a == 11:

+        a = 22

+    elif a == 12:

+        a = 23

+    elif b:

+        old = 12

+    else:

+        a = 40

+

+    #

+    b = false or 2 == 0 and 3 == 9

+    a = 0 + 3 * 5 + 6 + 7 + +8 # 36

+    while b:

+        a = a + 3

+    a = a + 5

+    write(stdout, "Hello!")

+

+

+# We should come till here :-)

+discard Foo(345)