Branch: Tag:

2004-10-11

2004-10-11 16:41:49 by Martin Stjernholm <mast@lysator.liu.se>

Show the error when the compile time replace() optimizer fails.

Rev: src/builtin_functions.c:1.469
Rev: src/language.yacc:1.317
Rev: src/las.c:1.326
Rev: src/program.c:1.493
Rev: src/program.h:1.182

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: las.c,v 1.325 2004/03/15 15:24:29 grubba Exp $ + || $Id: las.c,v 1.326 2004/10/11 16:41:48 mast Exp $   */      #include "global.h" - RCSID("$Id: las.c,v 1.325 2004/03/15 15:24:29 grubba Exp $"); + RCSID("$Id: las.c,v 1.326 2004/10/11 16:41:48 mast Exp $");      #include "language.h"   #include "interpret.h"
1836:       push_svalue(&thrown);    low_safe_apply_handler("compile_exception", error_handler, compat_handler, 1); -  if (SAFE_IS_ZERO(Pike_sp-1)) yy_describe_exception(&thrown); +  if (SAFE_IS_ZERO(Pike_sp-1)) yy_describe_exception(&thrown, 0);    pop_stack();    free_svalue(&thrown);    }else{
1947:    *(Pike_sp++) = thrown;    thrown.type = PIKE_T_INT;    low_safe_apply_handler("compile_exception", error_handler, compat_handler, 1); -  if (SAFE_IS_ZERO(Pike_sp-1)) yy_describe_exception(&thrown); +  if (SAFE_IS_ZERO(Pike_sp-1)) yy_describe_exception(&thrown, 0);    pop_stack();    }    }else if (!(Pike_compiler->flags & COMPILATION_FORCE_RESOLVE)) {
5373:    push_svalue(&thrown);    low_safe_apply_handler("compile_exception",    error_handler, compat_handler, 1); -  if (SAFE_IS_ZERO(Pike_sp-1)) yy_describe_exception(&thrown); +  if (SAFE_IS_ZERO(Pike_sp-1)) yy_describe_exception(&thrown, 0);    pop_stack();    free_svalue(&thrown);    }