Branch: Tag:

2003-11-09

2003-11-09 01:10:15 by Martin Stjernholm <mast@lysator.liu.se>

Made the interface for the global dynamic buffer reentrant.

Rev: src/apply_low.h:1.25
Rev: src/array.c:1.151
Rev: src/dynamic_buffer.c:1.24
Rev: src/dynamic_buffer.h:1.19
Rev: src/error.c:1.117
Rev: src/interpret.c:1.337
Rev: src/interpret_functions.h:1.161
Rev: src/las.c:1.341
Rev: src/mapping.c:1.173
Rev: src/modules/sprintf/sprintf.c:1.115
Rev: src/multiset.c:1.79
Rev: src/pike_types.c:1.224
Rev: src/program.c:1.530
Rev: src/stralloc.c:1.160
Rev: src/svalue.c:1.179

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: error.c,v 1.116 2003/09/19 12:24:59 grubba Exp $ + || $Id: error.c,v 1.117 2003/11/09 01:10:13 mast Exp $   */      #define NO_PIKE_SHORTHAND
23:   #include "threads.h"   #include "gc.h"    - RCSID("$Id: error.c,v 1.116 2003/09/19 12:24:59 grubba Exp $"); + RCSID("$Id: error.c,v 1.117 2003/11/09 01:10:13 mast Exp $");      #undef ATTRIBUTE   #define ATTRIBUTE(X)
328: Inside #if defined(PIKE_DEBUG)
   fprintf(stderr,"%s\n",(char *)msg);   #ifdef PIKE_DEBUG    { +  dynamic_buffer save_buf;    char *s;    struct svalue thrown;    fprintf(stderr,"Attempting to dump raw error: (may fail)\n"); -  init_buf(); +  init_buf(&save_buf);    move_svalue (&thrown, &throw_value);    throw_value.type = PIKE_T_INT;    describe_svalue(&thrown,0,0);    free_svalue (&thrown); -  s=simple_free_buf(); +  s=simple_free_buf(&save_buf);    fprintf(stderr,"%s\n",s);    free(s);    }