projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add plain balanced tree structure. Patch #5827.
[pspp]
/
src
/
math
/
group.c
diff --git
a/src/math/group.c
b/src/math/group.c
index c3dcbaadda5f8c8eccfd307294e782d1f2a9f65c..3978f2fb948818805c1c9045637ad8e1f2f0f727 100644
(file)
--- a/
src/math/group.c
+++ b/
src/math/group.c
@@
-1,6
+1,5
@@
/* PSPP - computes sample statistics.
Copyright (C) 1997-9, 2000 Free Software Foundation, Inc.
/* PSPP - computes sample statistics.
Copyright (C) 1997-9, 2000 Free Software Foundation, Inc.
- Written by John Darrington <john@darrington.wattle.id.au>
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License as
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License as
@@
-63,7
+62,11
@@
struct group_proc *
group_proc_get (struct variable *v)
{
/* This is not ideal, obviously. */
group_proc_get (struct variable *v)
{
/* This is not ideal, obviously. */
- if (v->aux == NULL)
- var_attach_aux (v, xmalloc (sizeof (struct group_proc)), var_dtor_free);
- return v->aux;
+ struct group_proc *group = var_get_aux (v);
+ if (group == NULL)
+ {
+ group = xmalloc (sizeof (struct group_proc));
+ var_attach_aux (v, group, var_dtor_free);
+ }
+ return group;
}
}