#include <ctype.h>
#include <inttypes.h>
#include <stdlib.h>
+#include <string.h>
#include <libpspp/assertion.h>
#include <libpspp/integer-format.h>
-#include <libpspp/str.h>
#include "error.h"
#include <byteswap.h>
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);