From 8848ad8a546627e1e935c46950c7a9df759b320e Mon Sep 17 00:00:00 2001 From: Kimplul Date: Thu, 13 Mar 2025 19:38:52 +0200 Subject: increase priority for loops --- examples/local-loop.ph | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 examples/local-loop.ph (limited to 'examples/local-loop.ph') diff --git a/examples/local-loop.ph b/examples/local-loop.ph new file mode 100644 index 0000000..2b7d870 --- /dev/null +++ b/examples/local-loop.ph @@ -0,0 +1,12 @@ +procedure SUM{num[int]} return int +var sum = 0 +var idx = 0 +is + do + sum = sum + idx, + idx = idx + 1 + until idx = num, + return sum +end procedure + +print SUM(1000000001) -- cgit v1.2.3