home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / listings / v_09_01 / 9n01104e < prev    next >
Text File  |  1990-10-04  |  451b  |  15 lines
  1.  
  2.         s = Tcl_GetVar(interp,"match_max",0);
  3.         if (buf_size != (new_size = 2*atoi(s))) {
  4.                 if (0 == (new_buf = realloc(buf,new_size+1))) {
  5.                         tcl_error("failed to grow match buf to %d bytes",
  6.                                 new_size);
  7.                         return(TCL_ERROR);
  8.                 }
  9.                 buf_size = new_size;
  10.                 buf = new_buf;
  11.         }
  12.  
  13.         Listing 5
  14.  
  15.