pike.git/ src/ program.c

Branch: Tag:

2001-03-28

2001-03-28 10:02:45 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

lots of PIKE_RUN_UNLOCKED stuff..

Rev: src/Makefile.in:1.253
Rev: src/backend.cmod:1.13
Rev: src/block_alloc.h:1.28
Rev: src/error.c:1.71
Rev: src/gc.c:1.148
Rev: src/global.h:1.60
Rev: src/main.c:1.119
Rev: src/mapping.c:1.119
Rev: src/modules/Image/encodings/xbm.c:1.14
Rev: src/modules/Parser/html.c:1.132
Rev: src/modules/spider/xml.c:1.39
Rev: src/pike_cpulib.c:1.1
Rev: src/pike_cpulib.h:1.6
Rev: src/pike_error.h:1.11
Rev: src/pike_memory.c:1.103
Rev: src/program.c:1.306
Rev: src/stralloc.c:1.118
Rev: src/svalue.h:1.84

5:   \*/   /**/   #include "global.h" - RCSID("$Id: program.c,v 1.305 2001/03/22 02:21:16 hubbe Exp $"); + RCSID("$Id: program.c,v 1.306 2001/03/28 10:02:43 hubbe Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
4158:       lfun_ids = allocate_mapping(NUM_LFUNS);    lfun_types = allocate_mapping(NUM_LFUNS); -  key.type = T_STRING; -  id.type = T_INT; -  val.type = T_TYPE; +     for (i=0; i < NUM_LFUNS; i++) {    lfun_strings[i] = make_shared_string(lfun_names[i]);    -  +  id.type = T_INT;    id.u.integer = i; -  +  key.type = T_STRING;    key.u.string = lfun_strings[i];    mapping_insert(lfun_ids, &key, &id);    -  +  val.type = T_TYPE;    val.u.type = make_pike_type(raw_lfun_types[i]);    mapping_insert(lfun_types, &key, &val);    free_type(val.u.type);