X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata%2Fvalue.h;h=97c24050ef6264712e05c2dd8b98ea069a0ccd89;hb=02d26302aea9cb2c25c8cbb50bd120674de1f862;hp=17f60bbd01bc40dd908dd2114fa3a6c983439968;hpb=393668423c1c9456fd82db6b30f25de078915da5;p=pspp-builds.git diff --git a/src/data/value.h b/src/data/value.h index 17f60bbd..97c24050 100644 --- a/src/data/value.h +++ b/src/data/value.h @@ -1,79 +1,63 @@ -/* PSPP - computes sample statistics. - Copyright (C) 1997-9, 2000 Free Software Foundation, Inc. - Written by Ben Pfaff . +/* PSPP - a program for statistical analysis. + Copyright (C) 1997-9, 2000, 2007 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 the Free Software Foundation; either version 2 of the - License, or (at your option) any later version. + 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 + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. - This program is distributed in the hope that it will be useful, but - WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - General Public License for more details. + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA - 02110-1301, USA. */ + along with this program. If not, see . */ -#if !value_h -#define value_h 1 +#ifndef DATA_VALUE_H +#define DATA_VALUE_H 1 -#include - -#include - -/* Values. */ - -/* Max length of a short string value, generally 8 chars. */ -#define MAX_SHORT_STRING ( (SIZEOF_DOUBLE)>=8 ? (SIZEOF_DOUBLE + 1)/2 * 2 : 8 ) +#include +#include +#include +#include "minmax.h" +/* "Short" strings, which are generally those no more than 8 + characters wide, can participate in more operations than + longer strings. */ +#define MAX_SHORT_STRING (MAX (ROUND_UP (SIZEOF_DOUBLE, 2), 8)) #define MIN_LONG_STRING (MAX_SHORT_STRING + 1) -/* Max string length. */ -#define MAX_LONG_STRING 255 - -/* This nonsense is required for SPSS compatibility */ -#define EFFECTIVE_LONG_STRING_LENGTH (MAX_LONG_STRING - 3) - -#define MAX_VERY_LONG_STRING 32767 - -#define MAX_STRING MAX_VERY_LONG_STRING - - -/* Special values. */ -#define SYSMIS (-DBL_MAX) -#define LOWEST second_lowest_value -#define HIGHEST DBL_MAX - -/* Describes one value, which is either a floating-point number or a - short string. */ +/* A numeric or short string value. + Multiple consecutive values represent a long string. */ union value { - /* A numeric value. */ double f; - - /* A short-string value. */ char s[MAX_SHORT_STRING]; - - /* Used by evaluate_expression() to return a string result. - As currently implemented, it's a pointer to a dynamic - buffer in the appropriate expression. - - Also used by the AGGREGATE procedure in handling string - values. */ - char *c; }; -/* Maximum number of `union value's in a single number or string - value. */ -#define MAX_ELEMS_PER_VALUE (MAX_STRING / sizeof (union value) + 1) +union value *value_dup (const union value *, int width); +union value *value_create (int width); -int compare_values (const union value *a, const union value *b, int width); +int compare_values (const void *, const void *, const void *var); +unsigned hash_value (const void *, const void *var); -unsigned hash_value(const union value *v, int width); +int compare_values_short (const void *, const void *, const void *var); +unsigned hash_value_short (const void *, const void *var); +static inline size_t value_cnt_from_width (int width); +void value_copy (union value *, const union value *, int width); +void value_set_missing (union value *, int width); +bool value_is_resizable (const union value *, int old_width, int new_width); +void value_resize (union value *, int old_width, int new_width); +int value_compare_3way (const union value *, const union value *, int width); +/* Number of "union value"s required for a variable of the given + WIDTH. */ +static inline size_t +value_cnt_from_width (int width) +{ + return width == 0 ? 1 : DIV_RND_UP (width, MAX_SHORT_STRING); +} -#endif /* !value.h */ +#endif /* data/value.h */