X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Foutput%2Fmeasure.c;h=3376de8fbd05c4be2b134a1d73f2ddc859e701b2;hb=bc2bcb0e2e77b4b02a32d6179b8ee6673bfdffa6;hp=8f6e666f667a83086dae4bd31274bf19387c3170;hpb=dfd1972f7bcb550a4fc3b05dbe7e71d12334b0a7;p=pspp diff --git a/src/output/measure.c b/src/output/measure.c index 8f6e666f66..3376de8fbd 100644 --- a/src/output/measure.c +++ b/src/output/measure.c @@ -1,5 +1,5 @@ /* PSPP - a program for statistical analysis. - Copyright (C) 1997-9, 2000, 2007, 2009 Free Software Foundation, Inc. + Copyright (C) 1997-9, 2000, 2007, 2009, 2010, 2011, 2012 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -16,19 +16,21 @@ #include -#include +#include "output/measure.h" +#include #include #include #if HAVE_LC_PAPER #include #endif -#include #include -#include +#include "data/file-name.h" +#include "libpspp/str.h" -#include "gl/error.h" +#include "gl/c-strcase.h" +#include "libpspp/message.h" #include "gettext.h" #define _(msgid) gettext (msgid) @@ -50,7 +52,7 @@ measure_dimension (const char *dimen) char *tail; /* Number. */ - raw = strtod (dimen, &tail); + raw = c_strtod (dimen, &tail); if (raw < 0.0) goto syntax_error; @@ -62,7 +64,7 @@ measure_dimension (const char *dimen) return raw * factor; syntax_error: - error (0, 0, _("`%s' is not a valid length."), dimen); + msg (ME, _("`%s' is not a valid length."), dimen); return -1; } @@ -90,7 +92,7 @@ measure_paper (const char *size, int *h, int *v) /* Treat string that starts with digit as explicit size. */ ok = parse_paper_size (size, h, v); if (!ok) - error (0, 0, _("syntax error in paper size `%s'"), size); + msg (ME, _("syntax error in paper size `%s'"), size); } else { @@ -134,7 +136,7 @@ parse_unit (const char *unit) unit += strspn (unit, CC_SPACES); for (p = units; p < units + sizeof units / sizeof *units; p++) - if (!strcasecmp (unit, p->name)) + if (!c_strcasecmp (unit, p->name)) return p->factor; return 0.0; } @@ -150,7 +152,7 @@ parse_paper_size (const char *size, int *h, int *v) char *tail; /* Width. */ - raw_h = strtod (size, &tail); + raw_h = c_strtod (size, &tail); if (raw_h <= 0.0) return false; @@ -158,7 +160,7 @@ parse_paper_size (const char *size, int *h, int *v) tail += strspn (tail, CC_SPACES "x,"); /* Length. */ - raw_v = strtod (tail, &tail); + raw_v = c_strtod (tail, &tail); if (raw_v <= 0.0) return false; @@ -227,7 +229,7 @@ get_standard_paper_size (struct substring name, int *h, int *v) assert (ok); return ok; } - error (0, 0, _("unknown paper type `%.*s'"), + msg (ME, _("unknown paper type `%.*s'"), (int) ss_length (name), ss_data (name)); return false; } @@ -245,7 +247,7 @@ read_paper_conf (const char *file_name, int *h, int *v) file = fopen (file_name, "r"); if (file == NULL) { - error (0, errno, _("error opening \"%s\""), file_name); + msg_error (errno, _("error opening input file `%s'"), file_name); return false; } @@ -256,7 +258,7 @@ read_paper_conf (const char *file_name, int *h, int *v) if (!ds_read_config_line (&line, &line_number, file)) { if (ferror (file)) - error (0, errno, _("error reading \"%s\""), file_name); + msg_error (errno, _("error reading file `%s'"), file_name); break; } @@ -273,7 +275,7 @@ read_paper_conf (const char *file_name, int *h, int *v) fclose (file); ds_destroy (&line); - error (0, 0, _("paper size file \"%s\" does not state a paper size"), + msg (ME, _("paper size file `%s' does not state a paper size"), file_name); return false; }