godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed bug: subranges of subranges did not work right

Browse Source
This commit is contained in:
ceriel 1987-11-17 14:29:14 +00:00
parent b1e2f3352c
commit bbf3f6e1be
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lang/m2/comp/Version.c
View File

@ -1 +1 @@
static char Version[] = "ACK Modula-2 compiler Version 0.26";
static char Version[] = "ACK Modula-2 compiler Version 0.27";

2
lang/m2/comp/type.c
View File

@ -290,7 +290,7 @@ chk_basesubrange(tp, base)
int fund = base->tp_next->tp_fund;
if (! chk_bounds(base->sub_lb, tp->sub_lb, fund) ||
! chk_bounds(base->sub_ub, tp->sub_ub, fund)) {
! chk_bounds(tp->sub_ub, base->sub_ub, fund)) {
error("base type has insufficient range");
}
base = base->tp_next;