X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Fparse.c;fp=src%2Flanguage%2Fexpressions%2Fparse.c;h=397121f913c51427d64258b41af4c39a8a83710e;hb=96e7b2185df6cafec262a1bec7a976f6901bf95b;hp=f1800f3775afeca8078d9916c608d8f5100fe0c9;hpb=05d3f5635ef3bf53d1b9c4a67f7bddb1f3060c80;p=pspp

diff --git a/src/language/expressions/parse.c b/src/language/expressions/parse.c
index f1800f3775..397121f913 100644
--- a/src/language/expressions/parse.c
+++ b/src/language/expressions/parse.c
@@ -863,9 +863,7 @@ expr_date (struct expression *e, int year_digits)
                : xasprintf ("%02d-%s-%04d", time->tm_mday, months[time->tm_mon],
                             time->tm_year + 1900));
 
-  struct substring s;
-  ss_alloc_substring_pool (&s, ss_cstr (tmp), e->expr_pool);
-
+  struct substring s = ss_clone_pool (ss_cstr (tmp), e->expr_pool);
   free (tmp);
 
   return expr_allocate_string (e, s);