Branch: Tag:

2001-12-16

2001-12-16 02:49:50 by Martin Stjernholm <mast@lysator.liu.se>

Replaced IS_ZERO with SAFE_IS_ZERO, except where it's obvious that
UNSAFE_IS_ZERO works.

Rev: src/array.c:1.121
Rev: src/builtin.cmod:1.72
Rev: src/builtin_functions.c:1.418
Rev: src/cpp.c:1.96
Rev: src/encode.c:1.135
Rev: src/interpret.c:1.254
Rev: src/interpret_functions.h:1.98
Rev: src/iterators.cmod:1.17
Rev: src/language.yacc:1.267
Rev: src/las.c:1.277
Rev: src/module_support.c:1.42
Rev: src/modules/Image/encodings/_xpm.c:1.18
Rev: src/modules/Image/encodings/ilbm.c:1.23
Rev: src/modules/Image/encodings/png.c:1.43
Rev: src/modules/Image/encodings/pvr.c:1.16
Rev: src/modules/Image/encodings/ras.c:1.15
Rev: src/modules/Image/encodings/xbm.c:1.15
Rev: src/modules/Parser/html.c:1.148
Rev: src/modules/_Image_GIF/image_gif.c:1.8
Rev: src/modules/files/efuns.c:1.107
Rev: src/modules/files/file.c:1.230
Rev: src/modules/files/socket.c:1.57
Rev: src/modules/files/stat.c:1.19
Rev: src/modules/files/udp.c:1.28
Rev: src/modules/spider/xml.c:1.47
Rev: src/modules/sprintf/sprintf.c:1.86
Rev: src/multiset.c:1.45
Rev: src/opcodes.c:1.118
Rev: src/operators.c:1.144
Rev: src/post_modules/GTK/source/gtkclist.pre:1.13
Rev: src/preprocessor.h:1.48
Rev: src/program.c:1.392
Rev: src/signal_handler.c:1.212
Rev: src/threads.c:1.177

5:   \*/   /**/   #include "global.h" - RCSID("$Id: las.c,v 1.276 2001/12/16 01:17:23 mast Exp $"); + RCSID("$Id: las.c,v 1.277 2001/12/16 02:49:40 mast Exp $");      #include "language.h"   #include "interpret.h"
1759:       push_svalue(&thrown);    low_safe_apply_handler("compile_exception", error_handler, compat_handler, 1); -  if (IS_ZERO(sp-1)) yy_describe_exception(&thrown); +  if (SAFE_IS_ZERO(sp-1)) yy_describe_exception(&thrown);    pop_stack();    free_svalue(&thrown);    }else{
1871:    *(Pike_sp++) = thrown;    thrown.type = PIKE_T_INT;    low_safe_apply_handler("compile_exception", error_handler, compat_handler, 1); -  if (IS_ZERO(sp-1)) yy_describe_exception(&thrown); +  if (SAFE_IS_ZERO(sp-1)) yy_describe_exception(&thrown);    pop_stack();    }    }else if (!force_resolve) {
2243:    if(!n) return 0;    switch(n->token)    { -  case F_CONSTANT: return !IS_ZERO(& n->u.sval); +  case F_CONSTANT: return !SAFE_IS_ZERO(& n->u.sval);    default: return 0;    }   }
2254:    if(!n) return 0;    switch(n->token)    { -  case F_CONSTANT: return IS_ZERO(& n->u.sval); +  case F_CONSTANT: return SAFE_IS_ZERO(& n->u.sval);    default: return 0;    }   }
3757:    !(    Pike_compiler->compiler_frame->current_return_type==void_type_string &&    CAR(n)->token == F_CONSTANT && -  IS_ZERO(& CAR(n)->u.sval) +  SAFE_IS_ZERO(& CAR(n)->u.sval)    )    ) {    if (!match_types(Pike_compiler->compiler_frame->current_return_type,
5155:    yyerror("Error evaluating constant.\n");    push_svalue(&thrown);    low_safe_apply_handler("compile_exception", error_handler, compat_handler, 1); -  if (IS_ZERO(sp-1)) yy_describe_exception(&thrown); +  if (SAFE_IS_ZERO(sp-1)) yy_describe_exception(&thrown);    pop_stack();    free_svalue(&thrown);    }
5224:    break;       case 1: -  if(Pike_compiler->catch_level && IS_ZERO(Pike_sp-1)) +  if(Pike_compiler->catch_level && SAFE_IS_ZERO(Pike_sp-1))    {    pop_stack();    return n;