- t = tab_create (2, 11 + (info.product_ext != NULL));
- r = 0;
-
- tab_text (t, 0, r, TAB_LEFT, _("File:"));
- tab_text (t, 1, r++, TAB_LEFT, fh_get_file_name (h));
-
- tab_text (t, 0, r, TAB_LEFT, _("Label:"));
- {
- const char *label = dict_get_label (d);
- if (label == NULL)
- label = _("No label.");
- tab_text (t, 1, r++, TAB_LEFT, label);
- }
-
- tab_text (t, 0, r, TAB_LEFT, _("Created:"));
- tab_text_format (t, 1, r++, TAB_LEFT, "%s %s by %s",
- info.creation_date, info.creation_time, info.product);
-
- if (info.product_ext)
- {
- tab_text (t, 0, r, TAB_LEFT, _("Product:"));
- tab_text (t, 1, r++, TAB_LEFT, info.product_ext);
- }
-
- tab_text (t, 0, r, TAB_LEFT, _("Integer Format:"));
- tab_text (t, 1, r++, TAB_LEFT,
- info.integer_format == INTEGER_MSB_FIRST ? _("Big Endian")
- : info.integer_format == INTEGER_LSB_FIRST ? _("Little Endian")
- : _("Unknown"));
-
- tab_text (t, 0, r, TAB_LEFT, _("Real Format:"));
- tab_text (t, 1, r++, TAB_LEFT,
- info.float_format == FLOAT_IEEE_DOUBLE_LE ? _("IEEE 754 LE.")
- : info.float_format == FLOAT_IEEE_DOUBLE_BE ? _("IEEE 754 BE.")
- : info.float_format == FLOAT_VAX_D ? _("VAX D.")
- : info.float_format == FLOAT_VAX_G ? _("VAX G.")
- : info.float_format == FLOAT_Z_LONG ? _("IBM 390 Hex Long.")
- : _("Unknown"));
-
- tab_text (t, 0, r, TAB_LEFT, _("Variables:"));
- tab_text_format (t, 1, r++, TAB_LEFT, "%zu", dict_get_var_cnt (d));
-
- tab_text (t, 0, r, TAB_LEFT, _("Cases:"));
- if (info.case_cnt == -1)
- tab_text (t, 1, r, TAB_LEFT, _("Unknown"));
- else
- tab_text_format (t, 1, r, TAB_LEFT, "%ld", (long int) info.case_cnt);
- r++;
-
- tab_text (t, 0, r, TAB_LEFT, _("Type:"));
- tab_text (t, 1, r++, TAB_LEFT, gettext (info.klass->name));