{
integer j;
- j = cur_input.loc_field;
+ j = loc;
- if (buffer[cur_input.loc_field] == '&' || buffer[cur_input.loc_field] == '+')
+ if (buffer[loc] == '&' || buffer[loc] == '+')
{
- incr(cur_input.loc_field);
- j = cur_input.loc_field;
+ incr(loc);
+ j = loc;
buffer[last] = ' ';
while (buffer[j] != ' ')
incr(j);
- pack_buffered_name(0, cur_input.loc_field, j - 1);
+ pack_buffered_name(0, loc, j - 1);
if (w_open_in(fmt_file))
goto lab40;
}
lab40:
- cur_input.loc_field = j;
+ loc = j;
return true;
}
if (closed_already++)
{
- show_line("close_files_and_terminated already ", 0);
+ puts("close_files_and_terminated already ");
return; // sanity check
}
if (trace_flag)
- show_line("\nclose_files_and_terminate ", 0);
+ puts("\nclose_files_and_terminate ");
for (k = 0; k <= 15; k++)
if (write_open[k])
print_ln();
if ((edit_name_start != 0) && (interaction > 0))
- {
call_edit(str_pool, edit_name_start, edit_name_length, edit_line);
- }
}
#ifdef DEBUG
/* sec 1338 */