/[emacs]/emacs/src/fns.c
ViewVC logotype

Diff of /emacs/src/fns.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.378 by teirllm, Sun Nov 21 00:57:49 2004 UTC revision 1.379 by kfstorm, Mon Nov 29 15:35:15 2004 UTC
# Line 562  concat (nargs, args, target_type, last_s Line 562  concat (nargs, args, target_type, last_s
562    struct textprop_rec  *textprops = NULL;    struct textprop_rec  *textprops = NULL;
563    /* Number of elments in textprops.  */    /* Number of elments in textprops.  */
564    int num_textprops = 0;    int num_textprops = 0;
565      USE_SAFE_ALLOCA;
566    
567    tail = Qnil;    tail = Qnil;
568    
# Line 670  concat (nargs, args, target_type, last_s Line 671  concat (nargs, args, target_type, last_s
671    
672    prev = Qnil;    prev = Qnil;
673    if (STRINGP (val))    if (STRINGP (val))
674      textprops      SAFE_ALLOCA (textprops, struct textprop_rec *, sizeof (struct textprop_rec) * nargs);
       = (struct textprop_rec *) alloca (sizeof (struct textprop_rec) * nargs);  
675    
676    for (argnum = 0; argnum < nargs; argnum++)    for (argnum = 0; argnum < nargs; argnum++)
677      {      {
# Line 827  concat (nargs, args, target_type, last_s Line 827  concat (nargs, args, target_type, last_s
827            last_to_end = textprops[argnum].to + SCHARS (this);            last_to_end = textprops[argnum].to + SCHARS (this);
828          }          }
829      }      }
830    
831      SAFE_FREE ();
832    return val;    return val;
833  }  }
834    

Legend:
Removed from v.1.378  
changed lines
  Added in v.1.379

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26