pike.git/ src/ program.c

2001-02-23

2001-02-23 14:33:45 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• babd87141a02966e39ec32acc9db3621b7d11f96 (16 lines) (+8/-8) ^{[ Show | Annotate ]}
  Branch: 7.9

Minor clean-up.

Rev: src/builtin_functions.c:1.345
Rev: src/constants.c:1.27
Rev: src/docode.c:1.106
Rev: src/language.yacc:1.227
Rev: src/module.c:1.14
Rev: src/opcodes.c:1.102
Rev: src/program.c:1.297
Rev: src/svalue.c:1.96

5:   \*/   /**/   #include "global.h" - RCSID("$Id: program.c,v 1.296 2001/02/21 21:38:47 grubba Exp $"); + RCSID("$Id: program.c,v 1.297 2001/02/23 14:33:24 grubba Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
2496:   #endif       copy_shared_string(dummy.name, name); -  copy_shared_string(dummy.type, type); +  copy_type(dummy.type, type);    dummy.identifier_flags = 0;    dummy.run_time_type=run_time_type;    dummy.func.offset=offset - Pike_compiler->new_program->inherits[0].storage_offset;
2692:    INT32 ret;    struct pike_string *name_s;    struct pike_type *type_s; -  name_s=make_shared_string(name); -  type_s=parse_type(type); +  name_s = make_shared_string(name); +  type_s = parse_type(type);       ret=define_variable(name_s, type_s, flags);    free_string(name_s);
2797:    dummy.func.offset=store_constant(c, 0, 0);    }    else { -  reference_shared_string(mixed_type_string); -  dummy.type = mixed_type_string; +  copy_type(dummy.type, mixed_type_string);    dummy.run_time_type=T_MIXED;    dummy.func.offset=-1;    }
3085:       /* Otherwise we make a new definition */    copy_shared_string(fun.name, name); -  copy_shared_string(fun.type, type); +  copy_type(fun.type, type);       fun.run_time_type=T_FUNCTION;   
3155:    /* define a new function */       copy_shared_string(fun.name, name); -  copy_shared_string(fun.type, type); +  copy_type(fun.type, type);       fun.identifier_flags=function_flags;    fun.run_time_type=T_FUNCTION;