073263
To: vim_dev@googlegroups.com
073263
Subject: Patch 7.4.600
073263
Fcc: outbox
073263
From: Bram Moolenaar <Bram@moolenaar.net>
073263
Mime-Version: 1.0
073263
Content-Type: text/plain; charset=UTF-8
073263
Content-Transfer-Encoding: 8bit
073263
------------
073263
073263
Patch 7.4.600
073263
Problem:    Memory wasted in struct because of aligning.
073263
Solution:   Split pos in lnum and col. (Dominique Pelle)
073263
Files:	    src/regexp_nfa.c
073263
073263
073263
*** ../vim-7.4.599/src/regexp_nfa.c	2015-01-27 14:39:55.661913204 +0100
073263
--- src/regexp_nfa.c	2015-01-27 14:43:04.323847916 +0100
073263
***************
073263
*** 1456,1462 ****
073263
  			 * matched an unlimited number of times. NFA_NOPEN is
073263
  			 * added only once at a position, while NFA_SPLIT is
073263
  			 * added multiple times.  This is more efficient than
073263
! 			 * not allowsing NFA_SPLIT multiple times, it is used
073263
  			 * a lot. */
073263
  			EMIT(NFA_NOPEN);
073263
  			break;
073263
--- 1456,1462 ----
073263
  			 * matched an unlimited number of times. NFA_NOPEN is
073263
  			 * added only once at a position, while NFA_SPLIT is
073263
  			 * added multiple times.  This is more efficient than
073263
! 			 * not allowing NFA_SPLIT multiple times, it is used
073263
  			 * a lot. */
073263
  			EMIT(NFA_NOPEN);
073263
  			break;
073263
***************
073263
*** 3726,3733 ****
073263
      {
073263
  	struct multipos
073263
  	{
073263
! 	    lpos_T	start;
073263
! 	    lpos_T	end;
073263
  	} multi[NSUBEXP];
073263
  	struct linepos
073263
  	{
073263
--- 3726,3735 ----
073263
      {
073263
  	struct multipos
073263
  	{
073263
! 	    linenr_T	start_lnum;
073263
! 	    linenr_T	end_lnum;
073263
! 	    colnr_T	start_col;
073263
! 	    colnr_T	end_col;
073263
  	} multi[NSUBEXP];
073263
  	struct linepos
073263
  	{
073263
***************
073263
*** 3812,3821 ****
073263
  	if (REG_MULTI)
073263
  	    fprintf(log_fd, "*** group %d, start: c=%d, l=%d, end: c=%d, l=%d\n",
073263
  		    j,
073263
! 		    sub->list.multi[j].start.col,
073263
! 		    (int)sub->list.multi[j].start.lnum,
073263
! 		    sub->list.multi[j].end.col,
073263
! 		    (int)sub->list.multi[j].end.lnum);
073263
  	else
073263
  	{
073263
  	    char *s = (char *)sub->list.line[j].start;
073263
--- 3814,3823 ----
073263
  	if (REG_MULTI)
073263
  	    fprintf(log_fd, "*** group %d, start: c=%d, l=%d, end: c=%d, l=%d\n",
073263
  		    j,
073263
! 		    sub->list.multi[j].start_col,
073263
! 		    (int)sub->list.multi[j].start_lnum,
073263
! 		    sub->list.multi[j].end_col,
073263
! 		    (int)sub->list.multi[j].end_lnum);
073263
  	else
073263
  	{
073263
  	    char *s = (char *)sub->list.line[j].start;
073263
***************
073263
*** 3952,3959 ****
073263
      {
073263
  	if (REG_MULTI)
073263
  	{
073263
! 	    if (from->list.multi[0].end.lnum >= 0)
073263
! 		to->list.multi[0].end = from->list.multi[0].end;
073263
  	}
073263
  	else
073263
  	{
073263
--- 3954,3964 ----
073263
      {
073263
  	if (REG_MULTI)
073263
  	{
073263
! 	    if (from->list.multi[0].end_lnum >= 0)
073263
!             {
073263
! 		to->list.multi[0].end_lnum = from->list.multi[0].end_lnum;
073263
! 		to->list.multi[0].end_col = from->list.multi[0].end_col;
073263
!             }
073263
  	}
073263
  	else
073263
  	{
073263
***************
073263
*** 3985,4017 ****
073263
  	for (i = 0; i < todo; ++i)
073263
  	{
073263
  	    if (i < sub1->in_use)
073263
! 		s1 = sub1->list.multi[i].start.lnum;
073263
  	    else
073263
  		s1 = -1;
073263
  	    if (i < sub2->in_use)
073263
! 		s2 = sub2->list.multi[i].start.lnum;
073263
  	    else
073263
  		s2 = -1;
073263
  	    if (s1 != s2)
073263
  		return FALSE;
073263
! 	    if (s1 != -1 && sub1->list.multi[i].start.col
073263
! 					     != sub2->list.multi[i].start.col)
073263
  		return FALSE;
073263
  
073263
  	    if (nfa_has_backref)
073263
  	    {
073263
  		if (i < sub1->in_use)
073263
! 		    s1 = sub1->list.multi[i].end.lnum;
073263
  		else
073263
  		    s1 = -1;
073263
  		if (i < sub2->in_use)
073263
! 		    s2 = sub2->list.multi[i].end.lnum;
073263
  		else
073263
  		    s2 = -1;
073263
  		if (s1 != s2)
073263
  		    return FALSE;
073263
! 		if (s1 != -1 && sub1->list.multi[i].end.col
073263
! 					       != sub2->list.multi[i].end.col)
073263
  		return FALSE;
073263
  	    }
073263
  	}
073263
--- 3990,4022 ----
073263
  	for (i = 0; i < todo; ++i)
073263
  	{
073263
  	    if (i < sub1->in_use)
073263
! 		s1 = sub1->list.multi[i].start_lnum;
073263
  	    else
073263
  		s1 = -1;
073263
  	    if (i < sub2->in_use)
073263
! 		s2 = sub2->list.multi[i].start_lnum;
073263
  	    else
073263
  		s2 = -1;
073263
  	    if (s1 != s2)
073263
  		return FALSE;
073263
! 	    if (s1 != -1 && sub1->list.multi[i].start_col
073263
! 					     != sub2->list.multi[i].start_col)
073263
  		return FALSE;
073263
  
073263
  	    if (nfa_has_backref)
073263
  	    {
073263
  		if (i < sub1->in_use)
073263
! 		    s1 = sub1->list.multi[i].end_lnum;
073263
  		else
073263
  		    s1 = -1;
073263
  		if (i < sub2->in_use)
073263
! 		    s2 = sub2->list.multi[i].end_lnum;
073263
  		else
073263
  		    s2 = -1;
073263
  		if (s1 != s2)
073263
  		    return FALSE;
073263
! 		if (s1 != -1 && sub1->list.multi[i].end_col
073263
! 					       != sub2->list.multi[i].end_col)
073263
  		return FALSE;
073263
  	    }
073263
  	}
073263
***************
073263
*** 4062,4068 ****
073263
      if (sub->in_use <= 0)
073263
  	col = -1;
073263
      else if (REG_MULTI)
073263
! 	col = sub->list.multi[0].start.col;
073263
      else
073263
  	col = (int)(sub->list.line[0].start - regline);
073263
      nfa_set_code(state->c);
073263
--- 4067,4073 ----
073263
      if (sub->in_use <= 0)
073263
  	col = -1;
073263
      else if (REG_MULTI)
073263
! 	col = sub->list.multi[0].start_col;
073263
      else
073263
  	col = (int)(sub->list.line[0].start - regline);
073263
      nfa_set_code(state->c);
073263
***************
073263
*** 4482,4488 ****
073263
  	    {
073263
  		if (subidx < sub->in_use)
073263
  		{
073263
! 		    save_lpos = sub->list.multi[subidx].start;
073263
  		    save_in_use = -1;
073263
  		}
073263
  		else
073263
--- 4487,4494 ----
073263
  	    {
073263
  		if (subidx < sub->in_use)
073263
  		{
073263
! 		    save_lpos.lnum = sub->list.multi[subidx].start_lnum;
073263
! 		    save_lpos.col = sub->list.multi[subidx].start_col;
073263
  		    save_in_use = -1;
073263
  		}
073263
  		else
073263
***************
073263
*** 4490,4509 ****
073263
  		    save_in_use = sub->in_use;
073263
  		    for (i = sub->in_use; i < subidx; ++i)
073263
  		    {
073263
! 			sub->list.multi[i].start.lnum = -1;
073263
! 			sub->list.multi[i].end.lnum = -1;
073263
  		    }
073263
  		    sub->in_use = subidx + 1;
073263
  		}
073263
  		if (off == -1)
073263
  		{
073263
! 		    sub->list.multi[subidx].start.lnum = reglnum + 1;
073263
! 		    sub->list.multi[subidx].start.col = 0;
073263
  		}
073263
  		else
073263
  		{
073263
! 		    sub->list.multi[subidx].start.lnum = reglnum;
073263
! 		    sub->list.multi[subidx].start.col =
073263
  					  (colnr_T)(reginput - regline + off);
073263
  		}
073263
  	    }
073263
--- 4496,4515 ----
073263
  		    save_in_use = sub->in_use;
073263
  		    for (i = sub->in_use; i < subidx; ++i)
073263
  		    {
073263
! 			sub->list.multi[i].start_lnum = -1;
073263
! 			sub->list.multi[i].end_lnum = -1;
073263
  		    }
073263
  		    sub->in_use = subidx + 1;
073263
  		}
073263
  		if (off == -1)
073263
  		{
073263
! 		    sub->list.multi[subidx].start_lnum = reglnum + 1;
073263
! 		    sub->list.multi[subidx].start_col = 0;
073263
  		}
073263
  		else
073263
  		{
073263
! 		    sub->list.multi[subidx].start_lnum = reglnum;
073263
! 		    sub->list.multi[subidx].start_col =
073263
  					  (colnr_T)(reginput - regline + off);
073263
  		}
073263
  	    }
073263
***************
073263
*** 4539,4545 ****
073263
  	    if (save_in_use == -1)
073263
  	    {
073263
  		if (REG_MULTI)
073263
! 		    sub->list.multi[subidx].start = save_lpos;
073263
  		else
073263
  		    sub->list.line[subidx].start = save_ptr;
073263
  	    }
073263
--- 4545,4554 ----
073263
  	    if (save_in_use == -1)
073263
  	    {
073263
  		if (REG_MULTI)
073263
!                 {
073263
! 		    sub->list.multi[subidx].start_lnum = save_lpos.lnum;
073263
! 		    sub->list.multi[subidx].start_col = save_lpos.col;
073263
!                 }
073263
  		else
073263
  		    sub->list.line[subidx].start = save_ptr;
073263
  	    }
073263
***************
073263
*** 4549,4555 ****
073263
  
073263
  	case NFA_MCLOSE:
073263
  	    if (nfa_has_zend && (REG_MULTI
073263
! 			? subs->norm.list.multi[0].end.lnum >= 0
073263
  			: subs->norm.list.line[0].end != NULL))
073263
  	    {
073263
  		/* Do not overwrite the position set by \ze. */
073263
--- 4558,4564 ----
073263
  
073263
  	case NFA_MCLOSE:
073263
  	    if (nfa_has_zend && (REG_MULTI
073263
! 			? subs->norm.list.multi[0].end_lnum >= 0
073263
  			: subs->norm.list.line[0].end != NULL))
073263
  	    {
073263
  		/* Do not overwrite the position set by \ze. */
073263
***************
073263
*** 4603,4618 ****
073263
  		sub->in_use = subidx + 1;
073263
  	    if (REG_MULTI)
073263
  	    {
073263
! 		save_lpos = sub->list.multi[subidx].end;
073263
  		if (off == -1)
073263
  		{
073263
! 		    sub->list.multi[subidx].end.lnum = reglnum + 1;
073263
! 		    sub->list.multi[subidx].end.col = 0;
073263
  		}
073263
  		else
073263
  		{
073263
! 		    sub->list.multi[subidx].end.lnum = reglnum;
073263
! 		    sub->list.multi[subidx].end.col =
073263
  					  (colnr_T)(reginput - regline + off);
073263
  		}
073263
  		/* avoid compiler warnings */
073263
--- 4612,4628 ----
073263
  		sub->in_use = subidx + 1;
073263
  	    if (REG_MULTI)
073263
  	    {
073263
! 		save_lpos.lnum = sub->list.multi[subidx].end_lnum;
073263
! 		save_lpos.col = sub->list.multi[subidx].end_col;
073263
  		if (off == -1)
073263
  		{
073263
! 		    sub->list.multi[subidx].end_lnum = reglnum + 1;
073263
! 		    sub->list.multi[subidx].end_col = 0;
073263
  		}
073263
  		else
073263
  		{
073263
! 		    sub->list.multi[subidx].end_lnum = reglnum;
073263
! 		    sub->list.multi[subidx].end_col =
073263
  					  (colnr_T)(reginput - regline + off);
073263
  		}
073263
  		/* avoid compiler warnings */
073263
***************
073263
*** 4637,4643 ****
073263
  		sub = &subs->norm;
073263
  
073263
  	    if (REG_MULTI)
073263
! 		sub->list.multi[subidx].end = save_lpos;
073263
  	    else
073263
  		sub->list.line[subidx].end = save_ptr;
073263
  	    sub->in_use = save_in_use;
073263
--- 4647,4656 ----
073263
  		sub = &subs->norm;
073263
  
073263
  	    if (REG_MULTI)
073263
!             {
073263
! 		sub->list.multi[subidx].end_lnum = save_lpos.lnum;
073263
! 		sub->list.multi[subidx].end_col = save_lpos.col;
073263
!             }
073263
  	    else
073263
  		sub->list.line[subidx].end = save_ptr;
073263
  	    sub->in_use = save_in_use;
073263
***************
073263
*** 4825,4839 ****
073263
  
073263
      if (REG_MULTI)
073263
      {
073263
! 	if (sub->list.multi[subidx].start.lnum < 0
073263
! 				       || sub->list.multi[subidx].end.lnum < 0)
073263
  	    goto retempty;
073263
! 	if (sub->list.multi[subidx].start.lnum == reglnum
073263
! 			       && sub->list.multi[subidx].end.lnum == reglnum)
073263
  	{
073263
! 	    len = sub->list.multi[subidx].end.col
073263
! 					  - sub->list.multi[subidx].start.col;
073263
! 	    if (cstrncmp(regline + sub->list.multi[subidx].start.col,
073263
  							 reginput, &len) == 0)
073263
  	    {
073263
  		*bytelen = len;
073263
--- 4838,4852 ----
073263
  
073263
      if (REG_MULTI)
073263
      {
073263
! 	if (sub->list.multi[subidx].start_lnum < 0
073263
! 				       || sub->list.multi[subidx].end_lnum < 0)
073263
  	    goto retempty;
073263
! 	if (sub->list.multi[subidx].start_lnum == reglnum
073263
! 			       && sub->list.multi[subidx].end_lnum == reglnum)
073263
  	{
073263
! 	    len = sub->list.multi[subidx].end_col
073263
! 					  - sub->list.multi[subidx].start_col;
073263
! 	    if (cstrncmp(regline + sub->list.multi[subidx].start_col,
073263
  							 reginput, &len) == 0)
073263
  	    {
073263
  		*bytelen = len;
073263
***************
073263
*** 4843,4852 ****
073263
  	else
073263
  	{
073263
  	    if (match_with_backref(
073263
! 			sub->list.multi[subidx].start.lnum,
073263
! 			sub->list.multi[subidx].start.col,
073263
! 			sub->list.multi[subidx].end.lnum,
073263
! 			sub->list.multi[subidx].end.col,
073263
  			bytelen) == RA_MATCH)
073263
  		return TRUE;
073263
  	}
073263
--- 4856,4865 ----
073263
  	else
073263
  	{
073263
  	    if (match_with_backref(
073263
! 			sub->list.multi[subidx].start_lnum,
073263
! 			sub->list.multi[subidx].start_col,
073263
! 			sub->list.multi[subidx].end_lnum,
073263
! 			sub->list.multi[subidx].end_col,
073263
  			bytelen) == RA_MATCH)
073263
  		return TRUE;
073263
  	}
073263
***************
073263
*** 5441,5446 ****
073263
--- 5454,5460 ----
073263
  
073263
      /* Allocate memory for the lists of nodes. */
073263
      size = (nstate + 1) * sizeof(nfa_thread_T);
073263
+ 
073263
      list[0].t = (nfa_thread_T *)lalloc(size, TRUE);
073263
      list[0].len = nstate + 1;
073263
      list[1].t = (nfa_thread_T *)lalloc(size, TRUE);
073263
***************
073263
*** 5482,5489 ****
073263
      {
073263
  	if (REG_MULTI)
073263
  	{
073263
! 	    m->norm.list.multi[0].start.lnum = reglnum;
073263
! 	    m->norm.list.multi[0].start.col = (colnr_T)(reginput - regline);
073263
  	}
073263
  	else
073263
  	    m->norm.list.line[0].start = reginput;
073263
--- 5496,5503 ----
073263
      {
073263
  	if (REG_MULTI)
073263
  	{
073263
! 	    m->norm.list.multi[0].start_lnum = reglnum;
073263
! 	    m->norm.list.multi[0].start_col = (colnr_T)(reginput - regline);
073263
  	}
073263
  	else
073263
  	    m->norm.list.line[0].start = reginput;
073263
***************
073263
*** 5580,5586 ****
073263
  		if (t->subs.norm.in_use <= 0)
073263
  		    col = -1;
073263
  		else if (REG_MULTI)
073263
! 		    col = t->subs.norm.list.multi[0].start.col;
073263
  		else
073263
  		    col = (int)(t->subs.norm.list.line[0].start - regline);
073263
  		nfa_set_code(t->state->c);
073263
--- 5594,5600 ----
073263
  		if (t->subs.norm.in_use <= 0)
073263
  		    col = -1;
073263
  		else if (REG_MULTI)
073263
! 		    col = t->subs.norm.list.multi[0].start_col;
073263
  		else
073263
  		    col = (int)(t->subs.norm.list.line[0].start - regline);
073263
  		nfa_set_code(t->state->c);
073263
***************
073263
*** 5861,5867 ****
073263
  		     * continue with what follows. */
073263
  		    if (REG_MULTI)
073263
  			/* TODO: multi-line match */
073263
! 			bytelen = m->norm.list.multi[0].end.col
073263
  						  - (int)(reginput - regline);
073263
  		    else
073263
  			bytelen = (int)(m->norm.list.line[0].end - reginput);
073263
--- 5875,5881 ----
073263
  		     * continue with what follows. */
073263
  		    if (REG_MULTI)
073263
  			/* TODO: multi-line match */
073263
! 			bytelen = m->norm.list.multi[0].end_col
073263
  						  - (int)(reginput - regline);
073263
  		    else
073263
  			bytelen = (int)(m->norm.list.line[0].end - reginput);
073263
***************
073263
*** 6741,6747 ****
073263
  		if (add)
073263
  		{
073263
  		    if (REG_MULTI)
073263
! 			m->norm.list.multi[0].start.col =
073263
  					 (colnr_T)(reginput - regline) + clen;
073263
  		    else
073263
  			m->norm.list.line[0].start = reginput + clen;
073263
--- 6755,6761 ----
073263
  		if (add)
073263
  		{
073263
  		    if (REG_MULTI)
073263
! 			m->norm.list.multi[0].start_col =
073263
  					 (colnr_T)(reginput - regline) + clen;
073263
  		    else
073263
  			m->norm.list.line[0].start = reginput + clen;
073263
***************
073263
*** 6854,6861 ****
073263
      {
073263
  	for (i = 0; i < subs.norm.in_use; i++)
073263
  	{
073263
! 	    reg_startpos[i] = subs.norm.list.multi[i].start;
073263
! 	    reg_endpos[i] = subs.norm.list.multi[i].end;
073263
  	}
073263
  
073263
  	if (reg_startpos[0].lnum < 0)
073263
--- 6868,6878 ----
073263
      {
073263
  	for (i = 0; i < subs.norm.in_use; i++)
073263
  	{
073263
! 	    reg_startpos[i].lnum = subs.norm.list.multi[i].start_lnum;
073263
! 	    reg_startpos[i].col = subs.norm.list.multi[i].start_col;
073263
! 
073263
! 	    reg_endpos[i].lnum = subs.norm.list.multi[i].end_lnum;
073263
! 	    reg_endpos[i].col = subs.norm.list.multi[i].end_col;
073263
  	}
073263
  
073263
  	if (reg_startpos[0].lnum < 0)
073263
***************
073263
*** 6903,6915 ****
073263
  		struct multipos *mpos = &subs.synt.list.multi[i];
073263
  
073263
  		/* Only accept single line matches that are valid. */
073263
! 		if (mpos->start.lnum >= 0
073263
! 			&& mpos->start.lnum == mpos->end.lnum
073263
! 			&& mpos->end.col >= mpos->start.col)
073263
  		    re_extmatch_out->matches[i] =
073263
! 			vim_strnsave(reg_getline(mpos->start.lnum)
073263
! 							    + mpos->start.col,
073263
! 					     mpos->end.col - mpos->start.col);
073263
  	    }
073263
  	    else
073263
  	    {
073263
--- 6920,6932 ----
073263
  		struct multipos *mpos = &subs.synt.list.multi[i];
073263
  
073263
  		/* Only accept single line matches that are valid. */
073263
! 		if (mpos->start_lnum >= 0
073263
! 			&& mpos->start_lnum == mpos->end_lnum
073263
! 			&& mpos->end_col >= mpos->start_col)
073263
  		    re_extmatch_out->matches[i] =
073263
! 			vim_strnsave(reg_getline(mpos->start_lnum)
073263
! 							    + mpos->start_col,
073263
! 					     mpos->end_col - mpos->start_col);
073263
  	    }
073263
  	    else
073263
  	    {
073263
*** ../vim-7.4.599/src/version.c	2015-01-27 14:39:55.661913204 +0100
073263
--- src/version.c	2015-01-27 14:44:06.739164665 +0100
073263
***************
073263
*** 743,744 ****
073263
--- 743,746 ----
073263
  {   /* Add new patch number below this line */
073263
+ /**/
073263
+     600,
073263
  /**/
073263
073263
-- 
073263
hundred-and-one symptoms of being an internet addict:
073263
126. You brag to all of your friends about your date Saturday night...but
073263
     you don't tell them it was only in a chat room.
073263
073263
 /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net   \\\
073263
///        sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
073263
\\\  an exciting new programming language -- http://www.Zimbu.org        ///
073263
 \\\            help me help AIDS victims -- http://ICCF-Holland.org    ///