1 /* PSPP - computes sample statistics.
2 Copyright (C) 1997-9, 2000, 2006 Free Software Foundation, Inc.
3 Written by Ben Pfaff <blp@gnu.org>.
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.
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.
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., 51 Franklin Street, Fifth Floor, Boston, MA
22 #include <data/case-source.h>
28 /* Creates a case source with class CLASS and auxiliary data AUX
29 and based on dictionary DICT. */
31 create_case_source (const struct case_source_class *class,
34 struct case_source *source = xmalloc (sizeof *source);
35 source->class = class;
40 /* Destroys case source SOURCE. It is the caller's responsible to
41 call the source's destroy function, if any. */
43 free_case_source (struct case_source *source)
47 if (source->class->destroy != NULL)
48 source->class->destroy (source);
53 /* Returns nonzero if CLASS is the class of SOURCE. */
55 case_source_is_class (const struct case_source *source,
56 const struct case_source_class *class)
58 return source != NULL && source->class == class;