Branch: Tag:

2019-12-17

2019-12-17 10:54:22 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Compiler: Fixed a few places that were missed in previous commit.

411:    ENCODE_WERR(".type many");    });    } else if (t->type == T_STRING) { -  if (t->car == int_type_string) { +  if (t->cdr == int_type_string) {    addchar(T_STRING ^ MIN_REF_TYPE);    EDB(1, {    ENCODE_WERR(".type string");
422:    EDB(1, {    ENCODE_WERR(".type nstring");    }); -  encode_type(t->car, data); +  encode_type(t->cdr, data);    }    return;    } else if (t->type <= MAX_TYPE) {
498:    t = t->cdr;    goto one_more_type;    +  case T_ARRAY: +  t = t->cdr; +  goto one_more_type; +     case T_TYPE:    case T_PROGRAM: -  case T_ARRAY: +     case T_MULTISET:    case T_NOT:    t = t->car;