Posted to tcl by Bradipo at Sun Mar 20 05:33:48 GMT 2011view raw

  1. if (0 >= (rc = read(0,line,BUFSIZ))) {
  2. if (!newcmd) line[0] = 0;
  3. else exit(0);
  4. } else line[rc] = '\0';
  5.