format: Fix typo in comment.

[pspp] / src / data / format.c

diff --git a/src/data/format.c b/src/data/format.c
index 5a347d4d58e18acc904abf03f099252c14f71a1b..113d52592eea46f5593e598bd06693633eaa3510 100644 (file)
--- a/src/data/format.c
+++ b/src/data/format.c
@@ -69,7 +69,7 @@ fmt_settings_create (void)
   int t;
 
   settings = xzalloc (sizeof *settings);
-  for (t = 0 ; t < FMT_NUMBER_OF_FORMATS ; ++t )
+  for (t = 0 ; t < FMT_NUMBER_OF_FORMATS ; ++t)
     fmt_number_style_init (&settings->styles[t]);
   fmt_settings_set_decimal (settings, '.');
 
@@ -84,7 +84,7 @@ fmt_settings_destroy (struct fmt_settings *settings)
     {
       int t;
 
-      for (t = 0 ; t < FMT_NUMBER_OF_FORMATS ; ++t )
+      for (t = 0 ; t < FMT_NUMBER_OF_FORMATS ; ++t)
         fmt_number_style_destroy (&settings->styles[t]);
 
       free (settings->styles);
@@ -99,7 +99,7 @@ fmt_settings_clone (const struct fmt_settings *old)
   int t;
 
   new = xmalloc (sizeof *new);
-  for (t = 0 ; t < FMT_NUMBER_OF_FORMATS ; ++t )
+  for (t = 0 ; t < FMT_NUMBER_OF_FORMATS ; ++t)
     fmt_number_style_clone (&new->styles[t], &old->styles[t]);
 
   return new;
@@ -895,6 +895,40 @@ fmt_from_io (int io, enum fmt_type *fmt_type)
     }
 }
 
+/* Translate U32, which is in the form found in SAV and SPV files, into a
+   format specification, and stores the new specification in *F.
+
+   If LOOSE is false, checks that the format specification is appropriate as an
+   output format for a variable with the given WIDTH and reports an error if
+   not.  If LOOSE is true, instead adjusts the format's width and decimals as
+   necessary to be suitable.
+
+   Return true if successful, false if there was an error.. */
+bool
+fmt_from_u32 (uint32_t u32, int width, bool loose, struct fmt_spec *f)
+{
+  uint8_t raw_type = u32 >> 16;
+  uint8_t w = u32 >> 8;
+  uint8_t d = u32;
+
+  msg_disable ();
+  f->w = w;
+  f->d = d;
+  bool ok = fmt_from_io (raw_type, &f->type);
+  if (ok)
+    {
+      if (loose)
+        fmt_fix_output (f);
+      else
+        ok = fmt_check_output (f);
+    }
+  if (ok)
+    ok = fmt_check_width_compat (f, width);
+  msg_enable ();
+
+  return ok;
+}
+
 /* Returns true if TYPE may be used as an input format,
    false otherwise. */
 bool
@@ -975,8 +1009,8 @@ fmt_date_template (enum fmt_type type, int width)
       break;
 
     case FMT_TIME:
-      s1 = "H:MM";
-      s2 = "H:MM:SS";
+      s1 = "HH:MM";
+      s2 = "HH:MM:SS";
       break;
 
     case FMT_DTIME: