rem: storing_columns = FALSE;
add: storing_columns = false;
context: init_parameters (int number_of_files){  int chars_used_by_number = 0;  if (use_form_feed)    {      lines_per_header = 3;      lines_per_footer = 0;    }  lines_per_body = lines_per_page - lines_per_header - lines_per_footer;  if (lines_per_body <= 0)    {      extremities = FALSE;      keep_FF = TRUE;    }  if (extremities == FALSE)    lines_per_body = lines_per_page;  if (double_space)    lines_per_body = lines_per_body / 2;  /* If input is stdin, cannot print parallel files.  BSD dumps core     on this. */  if (number_of_files == 0)    parallel_files = FALSE;  if (parallel_files)    columns = number_of_files;  /* One file, multi columns down: -b option is set to get a consistent     formulation with "FF set by hand" in input files. */  if (storing_columns)    balance_columns = TRUE;  /* Tabification is assumed for multiple columns. */  if (columns > 1)    {      if (!use_col_separator)	{	  /* Use default separator */	  if (join_lines)	    col_sep_string = line_separator;	  else	    col_sep_string = column_separator;	  col_sep_length = 1;	  use_col_separator = TRUE;	}      /* It's rather pointless to define a TAB separator with column         alignment */      else if (!join_lines && *col_sep_string == '\t')        col_sep_string = column_separator;      truncate_lines = TRUE;      untabify_input = TRUE;      tabify_output = TRUE;    }  else    storing_columns = FALSE;  /* -J dominates -w in any case */  if (join_lines)    truncate_lines = FALSE;  if (numbered_lines)    {      int tmp_i;      int chars_per_default_tab = 8;      line_count = start_line_num;      /* To allow input tab-expansion (-e sensitive) use:	 if (number_separator == input_tab_char)	   number_width = chars_per_number +	     TAB_WIDTH (chars_per_input_tab, chars_per_number);   */      /* Estimate chars_per_text without any margin and keep it constant. */      if (number_separator == '\t')	number_width = chars_per_number +	  TAB_WIDTH (chars_per_default_tab, chars_per_number);      else	number_width = chars_per_number + 1;      /* The number is part of the column width unless we are	 printing files in parallel. */      if (parallel_files)	chars_used_by_number = number_width;      /* We use power_10 to cut off the higher-order digits of the         line_number in function add_line_number */      tmp_i = chars_per_number;      for (power_10 = 1; tmp_i > 0; --tmp_i)        power_10 = 10 * power_10;    }  chars_per_column = (chars_per_line - chars_used_by_number -		     (columns - 1) * col_sep_length) / columns;  if (chars_per_column < 1)    error (EXIT_FAILURE, 0, _("page width too narrow"));  if (numbered_lines)    {      if (number_buff != NULL)	free (number_buff);      number_buff = (char *) xmalloc (2 * chars_per_number);    }  /* Pick the maximum between the tab width and the width of an     escape sequence.     The width of an escape sequence (4) isn't the lower limit any longer.     We've to use 8 as the lower limit, if we use chars_per_default_tab = 8     to expand a tab which is not an input_tab-char. */  if (clump_buff != NULL)    free (clump_buff);  clump_buff = (int *) xmalloc ((chars_per_input_tab > 8				? chars_per_input_tab : 8) * sizeof (int));}