pike.git / src / error.c

version» Context lines:

pike.git/src/error.c:14:   #include "array.h"   #include "object.h"   #include "main.h"   #include "builtin_functions.h"   #include "backend.h"   #include "operators.h"   #include "module_support.h"   #include "threads.h"   #include "gc.h"    - RCSID("$Id: error.c,v 1.69 2001/02/06 19:31:39 grubba Exp $"); + RCSID("$Id: error.c,v 1.70 2001/03/04 19:27:17 mirar Exp $");      #undef ATTRIBUTE   #define ATTRIBUTE(X)      /*    * Attempt to inhibit throwing of errors if possible.    * Used by exit_on_error() to avoid infinite sprintf() loops.    */   int Pike_inhibit_errors = 0;   
pike.git/src/error.c:122:    INT_TYPE index;    int i;    struct pike_frame *f;    struct object *o;       get_all_args("backtrace->`[]", args, "%i", &index);       if (index < 0) {    /* Indexing from end not supported. */    index_error("backtrace->`[]", Pike_sp-args, args, NULL, Pike_sp-args, -  "Indexing with negative value (%d).\n", index); +  "Indexing with negative value (%"PRINTPIKEINT"d).\n", index);    }       if (index < THIS_BT->iterator_index) {    THIS_BT->iterator = THIS_BT->trace;    THIS_BT->iterator_index = 0;    }       f = THIS_BT->iterator;    i = THIS_BT->iterator_index;   
pike.git/src/error.c:181:   {    INT_TYPE index;    struct pike_frame *f;       get_all_args("pike_frame->`[]", args, "%i", &index);       f = THIS_PF[0];       if (!f) {    index_error("pike_frame->`[]", Pike_sp-args, args, NULL, Pike_sp-args, -  "Indexing the empty array with %d.\n", index); +  "Indexing the empty array with %"PRINTPIKEINT"d.\n", index);    }    if (index < 0) {    index_error("pike_frame->`[]", Pike_sp-args, args, NULL, Pike_sp-args, -  "Indexing with negative index (%d)\n", index); +  "Indexing with negative index (%"PRINTPIKEINT"d)\n", index);    }    if (!(f->current_object && f->context.prog)) {    index_error("pike_frame->`[]", Pike_sp-args, args, NULL, Pike_sp-args, -  "Indexing the NULL value with %d.\n", index); +  "Indexing the NULL value with %"PRINTPIKEINT"d.\n", index);    }    switch(index) {    case 0: /* Filename */    case 1: /* Linenumber */    break;    case 2: /* Function */    if (f->current_object->prog) {    pop_n_elems(args);    ref_push_object(f->current_object);    Pike_sp[-1].subtype = f->fun;
pike.git/src/error.c:594:    case 0:    pop_n_elems(args);    ref_push_string(GENERIC_ERROR_THIS->desc);    break;    case 1:    pop_n_elems(args);    ref_push_array(GENERIC_ERROR_THIS->backtrace);    break;    default:    index_error("error->`[]", Pike_sp-args, args, NULL, Pike_sp-args, -  "Index %d is out of range 0 - 1.\n", ind); +  "Index %"PRINTPIKEINT"d is out of range 0 - 1.\n", ind);    break;    }   }      /*! @decl string describe()    *!    *! Make a readable error-message.    *!    *! @note    *! Uses @[describe_backtrace()] to generate the message.