pintos-os.org Git - pspp/blob - src/data/value.h

   1 /* PSPP - a program for statistical analysis.
   2    Copyright (C) 1997-9, 2000 Free Software Foundation, Inc.
   3
   4    This program is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation, either version 3 of the License, or
   7    (at your option) any later version.
   8
   9    This program is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12    GNU General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program.  If not, see <http://www.gnu.org/licenses/>. */
  16
  17 #if !value_h
  18 #define value_h 1
  19
  20 #include <float.h>
  21 #include <libpspp/misc.h>
  22 #include "minmax.h"
  23 #include <config.h>
  24
  25 /* Values. */
  26
  27 /* "Short" strings, which are generally those no more than 8
  28    characters wide, can participate in more operations than
  29    longer strings. */
  30 #define MAX_SHORT_STRING (MAX (ROUND_UP (SIZEOF_DOUBLE, 2), 8))
  31 #define MIN_LONG_STRING (MAX_SHORT_STRING + 1)
  32 #define MAX_STRING 32767
  33
  34 /* Special values. */
  35 #define SYSMIS (-DBL_MAX)
  36 #define LOWEST second_lowest_value
  37 #define HIGHEST DBL_MAX
  38
  39 /* Number of "union value"s required for a variable of the given
  40    WIDTH. */
  41 static inline size_t
  42 value_cnt_from_width (int width)
  43 {
  44   return width == 0 ? 1 : DIV_RND_UP (width, MAX_SHORT_STRING);
  45 }
  46
  47 /* A numeric or short string value.
  48    Multiple consecutive values represent a long string. */
  49 union value
  50   {
  51     double f;
  52     char s[MAX_SHORT_STRING];
  53   };
  54
  55 union value *value_dup (const union value *, int width);
  56 int compare_values (const union value *, const union value *, int width);
  57 unsigned hash_value (const union value  *, int width);
  58
  59 void value_copy (union value *, const union value *, int width);
  60 void value_set_missing (union value *, int width);
  61
  62 #endif /* !value.h */