2004-03-09
2004-03-09 15:49:04 by Martin Nilsson <mani@lysator.liu.se>
-
d8946e12b312be755d097bad34f95e539fb0a750
(14 lines)
(+8/-6)
[
Show
| Annotate
]
Branch: 7.9
simple_describe_array makes dodos on stderr; put inside PIKE_DEBUG. compact_array is a noop.
Rev: src/array.c:1.153
Rev: src/array.h:1.54
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: array.c,v 1.152 2003/11/09 02:40:42 mast Exp $
+ || $Id: array.c,v 1.153 2004/03/09 15:48:51 nilsson Exp $
*/
#include "global.h"
26:
#include "cyclic.h"
#include "multiset.h"
- RCSID("$Id: array.c,v 1.152 2003/11/09 02:40:42 mast Exp $");
+ RCSID("$Id: array.c,v 1.153 2004/03/09 15:48:51 nilsson Exp $");
PMOD_EXPORT struct array empty_array=
{
1257: Inside #if defined(PIKE_DEBUG)
Pike_fatal("Type field out of order!\n");
}
}
- #endif
+ #endif /* PIKE_DEBUG */
- PMOD_EXPORT struct array *compact_array(struct array *v) { return v; }
-
+
/*
* Get a pointer to the 'union anything' specified IF it is of the specified
* type. The 'union anything' may be changed, but not the type.
1895:
}
}
- PMOD_EXPORT void simple_describe_array(struct array *a)
+
+ #ifdef PIKE_DEBUG
+ void simple_describe_array(struct array *a)
{
dynamic_buffer save_buf;
char *s;
1913:
{
describe_svalue(ITEM(a)+e, indent, p);
}
+ #endif
void describe_array(struct array *a,struct processing *p,int indent)