Talk about implied decimal places in FORTRAN style for DATA LIST
[pspp-builds.git] / src / expr.h
1 /* PSPP - computes sample statistics.
2    Copyright (C) 1997-9, 2000 Free Software Foundation, Inc.
3    Written by Ben Pfaff <blp@gnu.org>.
4
5    This program is free software; you can redistribute it and/or
6    modify it under the terms of the GNU General Public License as
7    published by the Free Software Foundation; either version 2 of the
8    License, or (at your option) any later version.
9
10    This program is distributed in the hope that it will be useful, but
11    WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    General Public License for more details.
14
15    You should have received a copy of the GNU General Public License
16    along with this program; if not, write to the Free Software
17    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
18    02111-1307, USA. */
19
20 #if !expr_h
21 #define expr_h 1
22
23 /* Expression parsing flags. */
24 enum expr_type
25   {
26     EXPR_ANY = 0,               /* Any type. */
27     EXPR_BOOLEAN = 1,           /* Must be numeric; coerce to Boolean. */
28     EXPR_NUMERIC = 2,           /* Must be numeric result type. */
29     EXPR_STRING = 3,            /* Must be string result type. */
30     EXPR_ERROR = 4,             /* Indicates an error. */
31     EXPR_NO_OPTIMIZE = 0x1000   /* May be set in expr_parse()
32                                    argument to disable optimization. */
33   };
34
35 struct expression;
36 struct ccase;
37 union value;
38
39 struct expression *expr_parse (enum expr_type);
40 enum expr_type expr_get_type (const struct expression *);
41 double expr_evaluate (const struct expression *, const struct ccase *,
42                       int case_idx, union value *);
43 void expr_free (struct expression *);
44 void expr_debug_print_postfix (const struct expression *);
45
46 #endif /* expr.h */