vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-05 23:22:25 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

OPT.DynArr to be precise

Browse source
This commit is contained in:
Norayr Chilingarian 2019-11-01 02:57:16 +04:00
parent 9cd018a1f0
commit 75996e2842
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/compiler/OPV.Mod
View file

@ -215,7 +215,7 @@ MODULE OPV; (* J. Templ 16.2.95 / 3.7.96
IF (n^.class = OPT.Nderef) & (n^.typ^.comp = OPT.DynArr) THEN
d := dim; array := n^.typ;
WHILE d > 0 DO array := array^.BaseTyp; DEC(d) END;
IF array^.comp = DynArr THEN
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()