From: ceriel Date: Mon, 6 Jun 1988 13:02:41 +0000 (+0000) Subject: fixed problem that was introduced by fix of alignment problem X-Git-Tag: release-5-5~3222 X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=f5d3ab845d36b4f27ba0ddb2a96ec892fccadd6e;p=ack.git fixed problem that was introduced by fix of alignment problem --- diff --git a/util/ass/ass00.c b/util/ass/ass00.c index a184d6cfa..d0f016a40 100644 --- a/util/ass/ass00.c +++ b/util/ass/ass00.c @@ -340,11 +340,13 @@ endproc() { if ( prevstate!= pst_cast 0 ) { for ( lbhead= *pstate.s_locl; lbhead<&(*pstate.s_locl)[LOCLABSIZE] ; lbhead++ ) { - for ( lbp=lbhead; lbp!= lbp_cast 0; lbp= lbp_next ) { + for ( lbp=lbhead->l_chain; lbp!= lbp_cast 0; lbp= lbp_next ) { lbp_next= lbp->l_chain; freearea((area_t)lbp,(unsigned)sizeof *lbp) ; } } + freearea((area_t)(*pstate.s_locl), + LOCLABSIZE * (sizeof((*pstate.s_locl)[0]))); pstate= *prevstate ; freearea((area_t)prevstate,(unsigned)sizeof *prevstate) ; } diff --git a/util/ass/ass00.h b/util/ass/ass00.h index af03d731e..9b84cce4e 100644 --- a/util/ass/ass00.h +++ b/util/ass/ass00.h @@ -18,7 +18,7 @@ #define DUMP 1 /* dump between passes */ /* #define TIMING 1 /* some timing measurements */ /* #define JOHAN 1 /* dump the loaded instructions */ -/* #define MEMUSE 1 /* print memory usage statistics */ +#define MEMUSE 1 /* print memory usage statistics */ #ifndef DUMP #define dump(x) /* nothing */ diff --git a/util/ass/ass80.c b/util/ass/ass80.c index 649cd1581..af807c0d2 100644 --- a/util/ass/ass80.c +++ b/util/ass/ass80.c @@ -66,6 +66,7 @@ fatal(s) char *s; { */ error("Fatal error: %s",s); dump(0); + abort(); exit(-1); }