d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

fixed problem that was introduced by fix of alignment problem

Browse source
This commit is contained in:
ceriel 1988-06-06 13:02:41 +00:00
parent 8a368a9ed1
commit f5d3ab845d
3 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
util/ass/ass00.c
View file

@ -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) ;
}

2
util/ass/ass00.h
View file

@ -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 */

1
util/ass/ass80.c
View file

@ -66,6 +66,7 @@ fatal(s) char *s; {
*/
error("Fatal error: %s",s);
dump(0);
abort();
exit(-1);
}