comparison lib-src/make-docfile.c @ 25821:9a999c51f856

(scan_lisp_file): Fix typo causing infloop.
author Dave Love <fx@gnu.org>
date Mon, 27 Sep 1999 11:34:27 +0000
parents 89230444d638
children 134b57acef68
comparison
equal deleted inserted replaced
25820:a18595261196 25821:9a999c51f856
627 { 627 {
628 c = getc (infile); 628 c = getc (infile);
629 continue; 629 continue;
630 } 630 }
631 /* Skip the line break. */ 631 /* Skip the line break. */
632 while (c == '\n' || c != '\r') 632 while (c == '\n' || c == '\r')
633 c = getc (infile); 633 c = getc (infile);
634 /* Detect a dynamic doc string and save it for the next expression. */ 634 /* Detect a dynamic doc string and save it for the next expression. */
635 if (c == '#') 635 if (c == '#')
636 { 636 {
637 c = getc (infile); 637 c = getc (infile);