output: Use page_setup for parsing cairo page setup.
[pspp] / src / language / tests / paper-size.c
index 0322f5728b80209a165a55693afdc42da4364e63..bccc60f7945bdbc3d5e7de82e02b886286145187 100644 (file)
@@ -29,7 +29,7 @@ int
 cmd_debug_paper_size (struct lexer *lexer, struct dataset *ds UNUSED)
 {
   const char *paper_size;
-  int h, v;
+  double h, v;
 
   if (!lex_force_string (lexer))
     return CMD_FAILURE;
@@ -37,9 +37,7 @@ cmd_debug_paper_size (struct lexer *lexer, struct dataset *ds UNUSED)
 
   printf ("\"%s\" => ", paper_size);
   if (measure_paper (paper_size, &h, &v))
-    printf ("%.1f x %.1f in, %.0f x %.0f mm\n",
-            h / 72000., v / 72000.,
-            h / (72000 / 25.4), v / (72000 / 25.4));
+    printf ("%.1f x %.1f in, %.0f x %.0f mm\n", h, v, h * 25.4, v * 25.4);
   else
     printf ("error\n");
   lex_get (lexer);