This commit is contained in:
ceriel 1987-08-04 19:29:28 +00:00
parent 159b84ef68
commit bcb04a1a76
3 changed files with 3 additions and 2 deletions

View file

@ -6,7 +6,7 @@ DSRC=list.c data.c main.c scan.c svars.c trans.c util.c rmach.c run.c grows.c\
ISRC=dmach.c intable.c ISRC=dmach.c intable.c
OBJ=list.o data.o main.o scan.o svars.o trans.o util.o rmach.o run.o \ OBJ=list.o data.o main.o scan.o svars.o trans.o util.o rmach.o run.o \
dmach.o intable.o grows.o files.o dmach.o intable.o grows.o files.o
ACKDIR=$(EMHOME)/lib/descr ACKDIR=$(EMHOME)/lib
FE=fe FE=fe
INTABLES=pdp int INTABLES=pdp int
LNTABLES=acc apc abc ocm vax4 i86 m68k2 m68k4 pmds pmds4 mantra \ LNTABLES=acc apc abc ocm vax4 i86 m68k2 m68k4 pmds pmds4 mantra \

View file

@ -219,7 +219,7 @@ routines for systems calls needed by both C and Pascal.
When linking multiple \fI.o\fP or \fI.m\fP files created by When linking multiple \fI.o\fP or \fI.m\fP files created by
separate calls of \fIack\fP together, \fIack\fP cannot deduce separate calls of \fIack\fP together, \fIack\fP cannot deduce
the run-time system needed, the run-time system needed,
unless called as \fIapc\fP, \fIabc\P, \fIocm\fP or \fIacc\fP. unless called as \fIapc\fP, \fIabc\fP, \fIocm\fP or \fIacc\fP.
This flag serves to tell \fIack\fP which runtime system is This flag serves to tell \fIack\fP which runtime system is
needed in such a case. needed in such a case.
For example: "ack \-c x.c ; ack \-.c x.o". For example: "ack \-c x.c ; ack \-.c x.o".

View file

@ -53,6 +53,7 @@ gr_throw(id) register growstring *id ; {
/* Throw the string away */ /* Throw the string away */
if ( id->gr_max==0 ) return ; if ( id->gr_max==0 ) return ;
freecore(id->gr_string) ; freecore(id->gr_string) ;
id->gr_string = 0 ;
id->gr_max=0 ; id->gr_max=0 ;
id->gr_size=0 ; id->gr_size=0 ;
} }