/* PSPP - a program for statistical analysis.
- Copyright (C) 1997-9, 2000, 2007, 2009 Free Software Foundation, Inc.
+ Copyright (C) 1997-9, 2000, 2007, 2009, 2010 Free Software Foundation, Inc.
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
};
static inline void value_init (union value *, int width);
+static inline void value_clone (union value *, const union value *, int width);
static inline bool value_needs_init (int width);
static inline bool value_try_init (union value *, int width);
static inline void value_destroy (union value *, int width);
struct pool;
void value_init_pool (struct pool *, union value *, int width);
+void value_clone_pool (struct pool *, union value *, const union value *,
+ int width);
void value_resize_pool (struct pool *, union value *,
int old_width, int new_width);
\f
v->long_string = xmalloc (width);
}
+/* Initializes V as a value of the given WIDTH, as with value_init(), and
+ copies SRC's value into V as its initial value. */
+static inline void
+value_clone (union value *v, const union value *src, int width)
+{
+ if (width <= MAX_SHORT_STRING)
+ *v = *src;
+ else
+ v->long_string = xmemdup (src->long_string, width);
+}
+
/* Returns true if a value of the given WIDTH actually needs to
have the value_init and value_destroy functions called, false
if those functions are no-ops for values of the given WIDTH.