Branch: Tag:

1999-09-16

1999-09-16 23:56:12 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

some bugfixes for the compiler and array allocation

Rev: src/array.c:1.54
Rev: src/docode.c:1.50
Rev: src/las.c:1.87
Rev: src/testsuite.in:1.196

5:   \*/   /**/   #include "global.h" - RCSID("$Id: las.c,v 1.86 1999/09/11 08:15:55 hubbe Exp $"); + RCSID("$Id: las.c,v 1.87 1999/09/16 23:56:10 hubbe Exp $");      #include "language.h"   #include "interpret.h"
354:    if(a) a->parent = res;    if(b) b->parent = res;    -  /* We try to optimize most things, but argument lists are hard... */ -  if(token != F_ARG_LIST && (a || b)) -  res->node_info |= OPT_TRY_OPTIMIZE; +        switch(token)    {
378:    case F_MAGIC_INDEX:    case F_MAGIC_SET_INDEX:    res->node_info |= OPT_EXTERNAL_DEPEND; +  break;       case F_UNDEFINED:    res->node_info |= OPT_EXTERNAL_DEPEND | OPT_SIDE_EFFECT;
413:    break;       default: +  /* We try to optimize most things, but argument lists are hard... */ +  if(token != F_ARG_LIST && (a || b)) +  res->node_info |= OPT_TRY_OPTIMIZE; +     res->tree_info = res->node_info;    if(a) res->tree_info |= a->tree_info;    if(b) res->tree_info |= b->tree_info;