pike.git/ src/ pike_types.cmod

2021-11-27

2021-11-27 12:00:31 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 92a3918abc0e17d505c77b625ce3375c78ad279d (16 lines) (+16/-0) ^{[ Show | Annotate ]}
  Branch: master

Compiler [Typechecker]: Add type operator get_return.

298:    * OBJECT implements/is object id(int)    * OPERATOR type Depends on bit #15. Added in 8.1    * FIND_LFUN object type lfun (int) Added in 8.1 +  * GET_RETURN fun type - Added in 8.1    * SET_CAR type type Added in 8.1    * SET_CDR type type Added in 8.1    * TRANSITIVE fun_type fun_type Added in 8.1
2889:    {    if ((t->type & PIKE_T_MASK) == PIKE_T_OPERATOR) {    switch(t->type) { +  case PIKE_T_GET_RETURN: +  string_builder_strcat(s, "get_return"); +  break;    case PIKE_T_SET_CAR:    string_builder_strcat(s, "set_car");    break;
4123:    push_reverse_type(t->type);    } else {    switch(t->type) { +  case PIKE_T_GET_RETURN: +  push_type_operator(t->type, NULL); +  break;    case PIKE_T_FIND_LFUN:    push_type_operator(t->type, t->cdr);    break;
12499:   {    struct pike_type *res = NULL;    switch(op) { +  case PIKE_T_GET_RETURN: +  res = new_get_return_type(arg1, 0); +  break;    case PIKE_T_FIND_LFUN:    res = find_lfun_type(arg1, (ptrdiff_t)(void*)arg2);    break;
13226:    break;    }    +  case PIKE_T_GET_RETURN: +  low_make_pike_type(type_string + 2, cont); +  push_type_operator(type, NULL); +  break; +     default:    Pike_fatal("compile_type_string(): Unknown operator: 0x%04x\n", type);    break;