pike.git / src / pike_types.c

version» Context lines:

pike.git/src/pike_types.c:1:   /*   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: pike_types.c,v 1.216 2003/06/11 23:02:55 nilsson Exp $ + || $Id: pike_types.c,v 1.217 2003/06/12 18:57:16 nilsson Exp $   */      #include "global.h" - RCSID("$Id: pike_types.c,v 1.216 2003/06/11 23:02:55 nilsson Exp $"); + RCSID("$Id: pike_types.c,v 1.217 2003/06/12 18:57:16 nilsson Exp $");   #include <ctype.h>   #include "svalue.h"   #include "pike_types.h"   #include "stralloc.h"   #include "stuff.h"   #include "array.h"   #include "program.h"   #include "constants.h"   #include "object.h"   #include "multiset.h"
pike.git/src/pike_types.c:4089:    free_string(type_t);    }    }    return pop_unfinished_type();    }else{    pop_stack_mark();    return 0;    }   }    - INT32 get_max_args(struct pike_type *type) - { -  INT32 ret,tmp=max_correct_args; -  check_type(type->type); -  clear_markers(); -  type = check_call(function_type_string, type, 0); -  if(type) free_type(type); -  ret=max_correct_args; -  max_correct_args=tmp; -  return tmp; - } -  +    /* NOTE: type loses a reference. */   struct pike_type *new_check_call(node *fun, int *argno,    struct pike_type *type, node *args)   {    struct pike_type *tmp_type = NULL;       while (args && (args->token == F_ARG_LIST)) {    type = new_check_call(fun, argno, type, CAR(args));    args = CDR(args);    }