FreeBASIC  0.91.0
array_redim_obj.c
Go to the documentation of this file.
1 /* redim function */
2 
3 #include "fb.h"
4 
6  (
7  FBARRAY *array,
8  size_t element_len,
9  FB_DEFCTOR ctor,
10  FB_DEFCTOR dtor,
11  size_t dimensions,
12  ...
13  )
14 {
15  va_list ap;
16  int res;
17 
18  /* free old */
19  if( dtor )
20  fb_ArrayDestructObj( array, dtor );
21  fb_ArrayErase( array, 0 );
22 
23  va_start( ap, dimensions );
24  res = fb_hArrayAlloc( array, element_len, FB_FALSE, ctor, dimensions, ap );
25  va_end( ap );
26 
27  return res;
28 }