Branch: Tag:

1996-11-02

1996-11-02 00:25:35 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

minor fix

Rev: src/pike_types.c:1.4

243:    type_stack_mark();    type_stack_mark();    type_stack_mark(); -  internal_parse_type((char **)s); +  internal_parse_type(_s);    type_stack_reverse();    if(**s==',')    {
265:    }    ++*s;    type_stack_mark(); -  internal_parse_type((char **)s); /* return type */ +  internal_parse_type(_s); /* return type */    type_stack_reverse();    if(**s != ')') error("Missing ')' in function type.\n");    ++*s;
285:    type_stack_mark();    ++*s;    type_stack_mark(); -  internal_parse_type((char **)s); +  internal_parse_type(_s);    type_stack_reverse();    if(**s != ':') error("Expecting ':'.\n");    ++*s;    type_stack_mark(); -  internal_parse_type((char **)s); +  internal_parse_type(_s);    type_stack_reverse();    if(**s != ')') error("Expecting ')'.\n");    ++*s;
307:    if(**s == '(')    {    ++*s; -  internal_parse_type((char **)s); +  internal_parse_type(_s);    if(**s != ')') error("Expecting ')'.\n");    ++*s;    }else{
321:    if(**s == '(')    {    ++*s; -  internal_parse_type((char **)s); +  internal_parse_type(_s);    if(**s != ')') error("Expecting ')'.\n");    ++*s;    }else{