From 5575d3cb17b943c2215914e15a1343a9a189b134 Mon Sep 17 00:00:00 2001
From: radrow <radrowicki@gmail.com>
Date: Sun, 3 Jul 2022 19:12:33 +0200
Subject: [PATCH] .

---
 src/aeso_ast_to_fcode.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/aeso_ast_to_fcode.erl b/src/aeso_ast_to_fcode.erl
index f2e50c8..6818bfb 100644
--- a/src/aeso_ast_to_fcode.erl
+++ b/src/aeso_ast_to_fcode.erl
@@ -661,9 +661,9 @@ expr_to_fcode(Env, _Type, {app, _, {'..', _}, [A, B]}) ->
     Init = {tuple, [nil, expr_to_fcode(Env, B)]},
     Loop = {loop, Init, St,
             make_if(
-              {op, '=<', [ItProj, {var, AV}]},
+              {op, '>=', [ItProj, {var, AV}]},
               {continue, {tuple, [{op, '::', [ItProj, AcProj]},
-                                  {op, '+', [ItProj, {lit, {int, 1}}]}
+                                  {op, '-', [ItProj, {lit, {int, 1}}]}
                                  ]}},
               {break, AcProj}
              )},