tbreak.nim 559 B

123456789101112131415161718192021222324252627282930313233343536373839404142434445
  1. discard """
  2. output: '''10
  3. true true
  4. true false
  5. false true
  6. false false'''
  7. """
  8. var
  9. x = false
  10. run = true
  11. while run:
  12. run = false
  13. block myblock:
  14. if true:
  15. break
  16. echo "leaving myblock"
  17. x = true
  18. doAssert(x)
  19. # bug #1418
  20. iterator foo: int =
  21. for x in 0 .. 9:
  22. for y in [10,20,30,40,50,60,70,80,90]:
  23. yield x + y
  24. for p in foo():
  25. echo p
  26. break
  27. iterator permutations: int =
  28. yield 10
  29. for p in permutations():
  30. break
  31. # regression:
  32. proc main =
  33. for x in [true, false]:
  34. for y in [true, false]:
  35. echo x, " ", y
  36. main()