src/rangefunc-strings.c

   1 /*
   2  * rangefunc-strings.c: String Functions on ranges.
   3  *
   4  * Authors:
   5  *   Andreas J. Guelzow  <aguelzow@taliesin.ca>
   6  */
   7
   8 #include <gnumeric-config.h>
   9 #include "gnumeric.h"
  10 #include "rangefunc-strings.h"
  11
  12 #include <string.h>
  13
  14 /**
  15  * range_concatenate:
  16  * @data: (element-type utf8) (transfer none):
  17  * @res: (out) (transfer full):
  18  *
  19  * Returns: non-zero on error.
  20  */
  21 int
  22 range_concatenate (GPtrArray *data, char **res, gpointer user)
  23 {
  24         unsigned ui;
  25         size_t len = 0;
  26         GString *str;
  27
  28         for (ui = 0; ui < data->len; ui++)
  29                 len += strlen (g_ptr_array_index (data, ui));
  30
  31         str = g_string_sized_new (len);
  32
  33         for (ui = 0; ui < data->len; ui++)
  34                 g_string_append (str, g_ptr_array_index (data, ui));
  35
  36         *res = g_string_free (str, FALSE);
  37         return 0;
  38 }