From: Ben Pfaff Date: Tue, 21 May 2013 05:35:35 +0000 (-0700) Subject: DESCRIPTIVES: Fix a pair of memory leaks. X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f5a7058281a9bb3954b1324c82a6e997b614ce35;p=pspp DESCRIPTIVES: Fix a pair of memory leaks. --- diff --git a/src/language/stats/descriptives.c b/src/language/stats/descriptives.c index 8efb5f1fb4..94421ef1e9 100644 --- a/src/language/stats/descriptives.c +++ b/src/language/stats/descriptives.c @@ -689,6 +689,8 @@ descriptives_trns_free (void *trns_) casereader_destroy (t->z_reader); assert((t->missing_type != DSC_LISTWISE) ^ (t->vars != NULL)); free (t->vars); + free (t); + return ok; } @@ -732,11 +734,13 @@ setup_z_trns (struct dsc_proc *dsc, struct dataset *ds) { struct dsc_z_score *z; struct variable *dst_var; + char *label; dst_var = dict_create_var_assert (dataset_dict (ds), dv->z_name, 0); - var_set_label (dst_var, - xasprintf (_("Z-score of %s"),var_to_string (dv->v)), - false); + + label = xasprintf (_("Z-score of %s"),var_to_string (dv->v)); + var_set_label (dst_var, label, false); + free (label); z = &t->z_scores[cnt++]; z->src_var = dv->v;