pike.git/ src/ interpret.h

2000-08-17

2000-08-17 19:10:05 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 6f959026c59407800dcc1f6bad12da53b0902409 (13 lines) (+8/-5) ^{[ Show | Annotate ]}
  Branch: 7.9

Fixed a few warnings.

Rev: src/backend.c:1.55
Rev: src/compilation.h:1.19
Rev: src/dynamic_load.c:1.43
Rev: src/encode.c:1.68
Rev: src/gc.c:1.124
Rev: src/interpret.c:1.165
Rev: src/interpret.h:1.64
Rev: src/module_support.c:1.37
Rev: src/modules/Parser/parser.c:1.10
Rev: src/modules/call_out/call_out.c:1.39
Rev: src/modules/spider/xml.c:1.26
Rev: src/modules/sprintf/sprintf.c:1.73
Rev: src/opcodes.c:1.90
Rev: src/operators.c:1.100
Rev: src/pike_types.c:1.136
Rev: src/program.c:1.263

5:   \*/      /* -  * $Id: interpret.h,v 1.63 2000/08/09 12:49:27 grubba Exp $ +  * $Id: interpret.h,v 1.64 2000/08/17 18:20:44 grubba Exp $    */   #ifndef INTERPRET_H   #define INTERPRET_H
72:   #define debug_check_stack()   #endif    - #define check_stack(X) do { \ -  if(Pike_sp - Pike_interpreter.evaluator_stack + (X) >= Pike_stack_size) \ + #define check_stack(X) do { \ +  if(Pike_sp - Pike_interpreter.evaluator_stack + (X) >= Pike_stack_size) \    error("Svalue stack overflow. " \ -  "(%d of %d entries on stack, needed %d more entries)\n", \ -  Pike_sp-Pike_interpreter.evaluator_stack,Pike_stack_size,(X)); \ +  "(%ld of %ld entries on stack, needed %ld more entries)\n", \ +  PTRDIFF_T_TO_LONG(Pike_sp - Pike_interpreter.evaluator_stack), \ +  PTRDIFF_T_TO_LONG(Pike_stack_size), \ +  PTRDIFF_T_TO_LONG(X)); \    }while(0)      #define check_mark_stack(X) do { \