Lines Matching refs:num_formats
937 int num_formats, format_index, separator, add_format;
941 num_formats = format_index = 0;
988 (num_formats + 1) * sizeof(char*));
990 formats[num_formats] = LispMalloc(length + 1);
991 strncpy(formats[num_formats], start, length);
992 formats[num_formats][length] = '\0';
993 ++num_formats;
1002 else if (command == '<' && num_formats == 1) {
1035 *format_count = num_formats;
1040 free_formats(char **formats, int num_formats)
1042 if (num_formats) {
1043 while (--num_formats >= 0)
1044 LispFree(formats[num_formats]);
1057 int atsign, collon, num_formats, length;
1071 list_formats(info, '(', &next_format, &formats, &num_formats,
1131 free_formats(formats, num_formats);
1142 int choice, num_formats, has_default, num_arguments;
1155 &next_format, &formats, &num_formats, &has_default, NULL, NULL);
1203 if (has_default && (choice < 0 || choice >= num_formats))
1204 choice = num_formats - 1;
1207 if (choice >= 0 && choice < num_formats) {
1223 free_formats(formats, num_formats);
1236 num_formats;
1252 list_formats(info, '{', &next_format, &formats, &num_formats,
1486 free_formats(formats, num_formats);
1511 int i, k, total_length, length, padding, num_formats, has_default,
1517 list_formats(info, '<', &next_format, &formats, &num_formats,
1521 if (num_formats) {
1525 for (i = 1; i < num_formats; i++) {
1536 for (i = 0, cons = strings; i < num_formats; i++, cons = CDR(cons)) {
1550 for (cons = CDR(cons); i < num_formats; i++, cons = CDR(cons))
1557 free_formats(formats, num_formats);
1564 --num_formats;
1574 --num_formats;
1600 int num_fields = num_formats - (has_default != 0);
1629 if (num_formats - has_default == 1) {