Branch: Tag:

2008-02-27

2008-02-27 23:59:24 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Changed the definition of Pike_fp->context to a pointer.
This should reduce the overhead for apply() somewhat.

Rev: src/apply_low.h:1.33
Rev: src/builtin.cmod:1.194
Rev: src/interpret.c:1.386
Rev: src/interpret.h:1.171
Rev: src/interpret_functions.h:1.200
Rev: src/modules/Gmp/mpz_glue.c:1.171
Rev: src/object.c:1.282
Rev: src/object.h:1.93
Rev: src/opcodes.c:1.170
Rev: src/operators.c:1.227
Rev: src/program.c:1.653

2:   || 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: operators.c,v 1.226 2008/01/26 22:34:22 mast Exp $ + || $Id: operators.c,v 1.227 2008/02/27 23:59:18 grubba Exp $   */      #include "global.h"
615:    struct pike_string *file;    INT32 lineno;    if(Pike_fp->pc && -  (file = low_get_line(Pike_fp->pc, Pike_fp->context.prog, &lineno))) { +  (file = low_get_line(Pike_fp->pc, Pike_fp->context->prog, &lineno))) {    push_string(file);    }else{    push_int(0);
652:    struct pike_string *file;    INT32 lineno;    if(Pike_fp->pc && -  (file = low_get_line(Pike_fp->pc, Pike_fp->context.prog, &lineno))) { +  (file = low_get_line(Pike_fp->pc, Pike_fp->context->prog, &lineno))) {    push_string(file);    }else{    push_int(0);
1031:    ONERROR tmp1;    ONERROR tmp2;    -  if (Pike_fp->current_object && Pike_fp->context.prog && -  Pike_fp->current_object->prog) { +  if (Pike_fp->current_program) {    /* Look up the function-name */    struct pike_string *name = -  ID_FROM_INT(Pike_fp->current_object->prog, Pike_fp->fun)->name; +  ID_FROM_INT(Pike_fp->current_program, Pike_fp->fun)->name;    if ((!name->size_shift) && (name->len < 100))    fname = name->str;    }