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

Fixed problems with -I and with value conformant arrays

Browse source
This commit is contained in:
ceriel 1990-09-27 17:01:01 +00:00
parent 03a65131fc
commit 282d93dde0
4 changed files with 12 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lang/m2/comp/options.c
View file

@ -140,10 +140,10 @@ DoOption(text)
Realloc(DEFPATH,(mDEF+=10)*sizeof(char *));
}
for (i = ndirs++; i <= nDEF; i++) {
for (i = ndirs++; i < nDEF; i++) {
char *tmp = DEFPATH[i];
DEFPATH[i++] = new;
DEFPATH[i] = new;
new = tmp;
}
}

4
lang/m2/comp/program.g
View file

@ -13,7 +13,9 @@
#include "debug.h"
#include <alloc.h>
#include <em.h>
#include <em_arith.h>
#include <em_label.h>
#include <em_code.h>
#include <stb.h>
#include "strict3rd.h"

4
lang/m2/comp/stab.c
View file

@ -10,7 +10,9 @@
/* $Header$ */
#include <alloc.h>
#include <em.h>
#include <em_arith.h>
#include <em_label.h>
#include <em_code.h>
#include <flt_arith.h>
#include <stb.h>

5
lang/m2/comp/walk.c
View file

@ -354,7 +354,10 @@ WalkProcedure(procedure)
}
continue;
}
if (param->par_def->df_flags & D_DEFINED) {
#ifdef PASS_BIG_VAL_AS_VAR
if (param->par_def->df_flags & D_DEFINED)
#endif
{
/* Here, we have to make a copy of the
array. We must also remember how much
room is reserved for copies, because