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

Many more changes

Browse Source
This commit is contained in:
ceriel
1990-09-25 17:40:47 +00:00
parent 87af8d0aa5
commit f656bdc676
17 changed files with 276 additions and 234 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
util/grind/type.c
View File

@@ -11,6 +11,7 @@
#include "scope.h"
#include "message.h"
#include "langdep.h"
#include "expr.h"
p_type int_type, char_type, short_type, long_type, bool_type;
p_type uint_type, uchar_type, ushort_type, ulong_type;
@@ -401,11 +402,11 @@ compute_size(tp, AB)
assert(tp->ty_index->ty_A != 0);
if (tp->ty_index->ty_A & 1) {
low = BUFTOI(AB+tp->ty_index->ty_low);
low = get_int(AB+tp->ty_index->ty_low, int_size, T_INTEGER);
} else low = tp->ty_index->ty_low;
tp->ty_lb = low;
if (tp->ty_index->ty_A & 2) {
high = BUFTOI(AB+tp->ty_index->ty_up);
high = get_int(AB+tp->ty_index->ty_up, int_size, T_INTEGER);
} else high = tp->ty_index->ty_up;
tp->ty_hb = high;
return (high - low + 1) * tp->ty_elements->ty_size;