X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flibpspp%2Ffloat-format.c;h=332e2e7875e9138674cd4f9bb43303d5d3ce196f;hb=c65c1958dfeca54c74a39c65ca676a536c08de46;hp=50a4eae6005b071e1d61320621aa424614fd2654;hpb=70cbb925c6d8f705faa48c9167640e9fd1416ea8;p=pspp-builds.git

diff --git a/src/libpspp/float-format.c b/src/libpspp/float-format.c
index 50a4eae6..332e2e78 100644
--- a/src/libpspp/float-format.c
+++ b/src/libpspp/float-format.c
@@ -695,7 +695,7 @@ assemble_number (enum float_format type, struct fp *fp, void *number)
       break;
 
     case FLOAT_Z_SHORT:
-      put_uint64 (native_to_be32 (assemble_z (fp, 7, 24)), number);
+      put_uint32 (native_to_be32 (assemble_z (fp, 7, 24)), number);
       break;
     case FLOAT_Z_LONG:
       put_uint64 (native_to_be64 (assemble_z (fp, 7, 56)), number);