Fixed problems with -I and with value conformant arrays
authorceriel <none@none>
Thu, 27 Sep 1990 17:01:01 +0000 (17:01 +0000)
committerceriel <none@none>
Thu, 27 Sep 1990 17:01:01 +0000 (17:01 +0000)
lang/m2/comp/options.c
lang/m2/comp/program.g
lang/m2/comp/stab.c
lang/m2/comp/walk.c

index d45e8b5..453ff23 100644 (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;
                        }
                }
index 96ca2fc..44c19ef 100644 (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"
index deca994..aad9a0a 100644 (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>
 
index 8eb4c97..1f7a87b 100644 (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