- int result = internal_cmd_record_type ();
-
- if (result == CMD_FAILURE)
- {
- int i;
-
- if (formats[fty.record.fmt].cat & FCAT_STRING)
- for (i = 0; i < rct.nv; i++)
- free (rct.v[i].c);
- free (rct.v);
- }
-
- return result;
-}
-
-static int
-internal_cmd_record_type (void)
-{
- /* Initialize the record_type structure. */
- rct.next = NULL;
- rct.flags = 0;
- if (fty.duplicate)
- rct.flags |= RCT_DUPLICATE;
- if (fty.missing)
- rct.flags |= RCT_MISSING;
- rct.v = NULL;
- rct.nv = 0;
- rct.ft = n_trns;
- if (fty.case_sbc.name[0])
- rct.case_sbc = fty.case_sbc;