Branch: Tag:

1995-10-29

1995-10-29 22:24:06 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

fixed bugs

Rev: src/language.y:1.2
Rev: src/las.h:1.2
Rev: src/lex.c:1.2
Rev: src/modules/files/file.c:1.2
Rev: src/program.c:1.2

1933:       free_all_defines();    -  if(!local_variables) -  local_variables=ALLOC_STRUCT(locals); -  local_variables->next=0; -  local_variables->current_number_of_locals=0; -  local_variables->current_type=0; -  local_variables->current_return_type=0; +     simple_add_define("__uLPC__", "1",0);       for (tmpf=lpc_predefs; tmpf; tmpf=tmpf->next)
1978:      void end_new_file()   { -  while(local_variables) +  if(current_file)    { -  int e; -  struct locals *l; -  for(e=0;e<local_variables->current_number_of_locals;e++) -  { -  free_string(local_variables->variable[e].name); -  free_string(local_variables->variable[e].type); +  free_string(current_file); +  current_file=0;    }    -  if(local_variables->current_type) -  free_string(local_variables->current_type); -  -  if(local_variables->current_return_type) -  free_string(local_variables->current_return_type); -  -  l=local_variables->next; -  free((char *)local_variables); -  local_variables=l; -  } -  +     free_inputstate(istate);    istate=NULL;    free_all_defines();