[Pspp-cvs] pspp/src/data ChangeLog sys-file-reader.c

[Ben Pfaff]

CVSROOT:        /cvsroot/pspp
Module name:    pspp
Changes by:     Ben Pfaff <blp> 08/02/03 06:47:24

Modified files:
        src/data       : ChangeLog sys-file-reader.c 

Log message:
        In system files, fix error message when floating-point format cannot
        be identified.
        
        Patch #6347.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pspp/src/data/ChangeLog?cvsroot=pspp&r1=1.180&r2=1.181
http://cvs.savannah.gnu.org/viewcvs/pspp/src/data/sys-file-reader.c?cvsroot=pspp&r1=1.56&r2=1.57

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/pspp/pspp/src/data/ChangeLog,v
retrieving revision 1.180
retrieving revision 1.181
diff -u -b -r1.180 -r1.181
--- ChangeLog   3 Feb 2008 06:45:03 -0000       1.180
+++ ChangeLog   3 Feb 2008 06:47:24 -0000       1.181
@@ -7,6 +7,8 @@
        because PSPP does not yet support them.
        (read_extension_record): Ignore extension records 20 and 21, which
        PSPP does not yet support.
+       (read_header): Fix error message when floating-point format cannot
+       be identified.
 
 2008-02-01  Ben Pfaff  <address@hidden>
 

Index: sys-file-reader.c
===================================================================
RCS file: /cvsroot/pspp/pspp/src/data/sys-file-reader.c,v
retrieving revision 1.56
retrieving revision 1.57
diff -u -b -r1.56 -r1.57
--- sys-file-reader.c   3 Feb 2008 06:45:03 -0000       1.56
+++ sys-file-reader.c   3 Feb 2008 06:47:24 -0000       1.57
@@ -425,10 +425,9 @@
   read_bytes (r, raw_bias, sizeof raw_bias);
   if (float_identify (100.0, raw_bias, sizeof raw_bias, &r->float_format) == 0)
     {
-      sys_warn (r, _("Compression bias (%g) is not the usual "
+      sys_warn (r, _("Compression bias is not the usual "
                      "value of 100, or system file uses unrecognized "
-                     "floating-point format."),
-                r->bias);
+                     "floating-point format."));
       if (r->integer_format == INTEGER_MSB_FIRST)
         r->float_format = FLOAT_IEEE_DOUBLE_BE;
       else