Branch: Tag:

1996-05-03

1996-05-03 11:49:48 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

better typechecking

Rev: src/las.c:1.9

961:    }    break;    +  case F_ASSIGN: +  if(CAR(n) && CDR(n) && +  !match_types(CDR(n)->type,CAR(n)->type)) +  my_yyerror("Bad type in assignment.\n"); +  break; +     case F_INDEX:    type_a=CAR(n)->type;    type_b=CDR(n)->type;