From b19b9a27a0efa7d46eda31d0bb81ade955d80e99 Mon Sep 17 00:00:00 2001
From: Quentin Carbonneaux <quentin.carbonneaux@yale.edu>
Date: Fri, 18 Mar 2016 14:44:20 -0400
Subject: handle padding correctly in types
---
lisc/parse.c | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
(limited to 'lisc/parse.c')
diff --git a/lisc/parse.c b/lisc/parse.c
index 43787c2..bf509d1 100644
--- a/lisc/parse.c
+++ b/lisc/parse.c
@@ -745,7 +745,7 @@ parsetyp()
a = s - a;
if (++n < NSeg) {
/* padding segment */
- ty->seg[n].flt = 0;
+ ty->seg[n].ispad = 1;
ty->seg[n].len = a;
}
}
@@ -757,7 +757,8 @@ parsetyp()
c = 1;
while (c-- > 0) {
if (++n < NSeg) {
- ty->seg[n].flt = flt;
+ ty->seg[n].isflt = flt;
+ ty->seg[n].ispad = 0;
ty->seg[n].len = s;
}
sz += a + s;
--
cgit 1.4.1