diff options
| author | Kimplul <kimi.h.kuparinen@gmail.com> | 2025-03-13 19:38:52 +0200 |
|---|---|---|
| committer | Kimplul <kimi.h.kuparinen@gmail.com> | 2025-03-13 19:38:52 +0200 |
| commit | 8848ad8a546627e1e935c46950c7a9df759b320e (patch) | |
| tree | 37edc965e348f2fd5433533ad963f7bd41be8a05 /examples/local-loop.ph | |
| parent | 1283d90da7c16bf0e44118e0e9130f2274e2a0f8 (diff) | |
| download | posthaste-8848ad8a546627e1e935c46950c7a9df759b320e.tar.gz posthaste-8848ad8a546627e1e935c46950c7a9df759b320e.zip | |
increase priority for loops
Diffstat (limited to 'examples/local-loop.ph')
| -rw-r--r-- | examples/local-loop.ph | 12 |
1 files changed, 12 insertions, 0 deletions
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) |