#include <output/output.h>
#include <output/table.h>
+#include "minmax.h"
+
#include "gettext.h"
#define _(msgid) gettext (msgid)
int i;
for (p = max; *p; p++)
- t->w[p - max] = min (tab_natural_width (t, d, p - max),
+ t->w[p - max] = MIN (tab_natural_width (t, d, p - max),
*p * d->prop_em_width);
for (i = 0; i < t->nr; i++)
t->h[i] = tab_natural_height (t, d, i);
/* SYSFILE INFO utility. */
int
-cmd_sysfile_info (struct dataset *ds UNUSED)
+cmd_sysfile_info (struct lexer *lexer, struct dataset *ds UNUSED)
{
struct file_handle *h;
struct dictionary *d;
int r, nr;
int i;
- lex_match_id ("FILE");
- lex_match ('=');
+ lex_match_id (lexer, "FILE");
+ lex_match (lexer, '=');
- h = fh_parse (FH_REF_FILE);
+ h = fh_parse (lexer, FH_REF_FILE);
if (!h)
return CMD_FAILURE;
if (r + 10 + nvl > nr)
{
- nr = max (nr * dict_get_var_cnt (d) / (i + 1), nr);
+ nr = MAX (nr * dict_get_var_cnt (d) / (i + 1), nr);
nr += 10 + nvl;
tab_realloc (t, 4, nr);
}
dict_destroy (d);
- return lex_end_of_command ();
+ return lex_end_of_command (lexer);
}
\f
/* DISPLAY utility. */
static void display_vectors (const struct dictionary *dict, int sorted);
int
-cmd_display (struct dataset *ds)
+cmd_display (struct lexer *lexer, struct dataset *ds)
{
/* Whether to sort the list of variables alphabetically. */
int sorted;
size_t n;
struct variable **vl;
- if (lex_match_id ("MACROS"))
+ if (lex_match_id (lexer, "MACROS"))
display_macros ();
- else if (lex_match_id ("DOCUMENTS"))
+ else if (lex_match_id (lexer, "DOCUMENTS"))
display_documents (dataset_dict (ds));
- else if (lex_match_id ("FILE"))
+ else if (lex_match_id (lexer, "FILE"))
{
som_blank_line ();
- if (!lex_force_match_id ("LABEL"))
+ if (!lex_force_match_id (lexer, "LABEL"))
return CMD_FAILURE;
if (dict_get_label (dataset_dict (ds)) == NULL)
tab_output_text (TAB_LEFT,
const char **cp;
int as;
- sorted = lex_match_id ("SORTED");
+ sorted = lex_match_id (lexer, "SORTED");
for (cp = sbc; *cp; cp++)
- if (token == T_ID && lex_id_match (*cp, tokid))
+ if (lex_token (lexer) == T_ID && lex_id_match (*cp, lex_tokid (lexer)))
{
- lex_get ();
+ lex_get (lexer);
break;
}
as = cp - sbc;
return CMD_SUCCESS;
}
- lex_match ('/');
- lex_match_id ("VARIABLES");
- lex_match ('=');
+ lex_match (lexer, '/');
+ lex_match_id (lexer, "VARIABLES");
+ lex_match (lexer, '=');
- if (token != '.')
+ if (lex_token (lexer) != '.')
{
- if (!parse_variables (dataset_dict (ds), &vl, &n, PV_NONE))
+ if (!parse_variables (lexer, dataset_dict (ds), &vl, &n, PV_NONE))
{
free (vl);
return CMD_FAILURE;
free (vl);
}
- return lex_end_of_command ();
+ return lex_end_of_command (lexer);
}
static void
t->w[0] = tab_natural_width (t, d, 0);
if (_as == AS_DICTIONARY || _as == AS_VARIABLES || _as == AS_LABELS)
{
- t->w[1] = max (tab_natural_width (t, d, 1), d->prop_em_width * 5);
- t->w[2] = max (tab_natural_width (t, d, 2), d->prop_em_width * 35);
+ t->w[1] = MAX (tab_natural_width (t, d, 1), d->prop_em_width * 5);
+ t->w[2] = MAX (tab_natural_width (t, d, 2), d->prop_em_width * 35);
pc = 3;
}
else pc = 1;
if (r + 10 + nvl > nr)
{
- nr = max (nr * n / (i + 1), nr);
+ nr = MAX (nr * n / (i + 1), nr);
nr += 10 + nvl;
tab_realloc (t, nc, nr);
}