From 076307c0a79be34cbb4a9e39ae18bf897efd444f Mon Sep 17 00:00:00 2001 From: Norayr Chilingarian Date: Fri, 1 Nov 2019 03:04:42 +0400 Subject: [PATCH] removed PromoteIntConstToLInt() function call --- src/compiler/OPV.Mod | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/compiler/OPV.Mod b/src/compiler/OPV.Mod index c8a1c4e8..371d69d3 100644 --- a/src/compiler/OPV.Mod +++ b/src/compiler/OPV.Mod @@ -218,7 +218,7 @@ MODULE OPV; (* J. Templ 16.2.95 / 3.7.96 IF array^.comp = OPT.DynArr THEN design(n^.left, 10); OPM.WriteString("->len["); OPM.WriteInt(dim); OPM.Write("]") ELSE - OPM.WriteInt(array^.n); OPM.PromoteIntConstToLInt() + OPM.WriteInt(array^.n) END ELSE OPC.Len(n^.obj, n^.typ, dim)