Return to digest-doc.c CVS log

Up to [CSRG BSD Unix] / 43BSDReno / contrib / emacs-18.55 / etc

Annotation of 43BSDReno/contrib/emacs-18.55/etc/digest-doc.c, revision 1.1.1.1

1.1       root        1: /* Give this program DOCSTR.mm.nn as standard input
                      2:    and it outputs to standard output
                      3:    a file of nroff output containing the doc strings.
                      4: 
                      5:    See also sorted-doc.c, which produces similar output
                      6:    but in texinfo format and sorted by function/variable name.  */
                      7: 
                      8: #include <stdio.h>
                      9: main ()
                     10: {
                     11:   register int ch;
                     12:   register int notfirst = 0;
                     13: 
                     14:   printf (".TL\n");
                     15:   printf ("Command Summary for GNU Emacs\n");
                     16:   printf (".AU\nRichard M. Stallman\n");
                     17:   while ((ch = getchar ()) != EOF)
                     18:     {
                     19:       if (ch == '\037')
                     20:        {
                     21:          if (notfirst)
                     22:            printf ("\n.DE");
                     23:          else
                     24:            notfirst = 1;
                     25: 
                     26:          printf ("\n.SH\n");
                     27: 
                     28:          ch = getchar ();
                     29:          printf (ch == 'F' ? "Function " : "Variable ");
                     30: 
                     31:          while ((ch = getchar ()) != '\n')  /* Changed this line */
                     32:            {
                     33:              if (ch != EOF)
                     34:                  putchar (ch);
                     35:              else
                     36:                {
                     37:                  ungetc (ch, stdin);
                     38:                  break;
                     39:                }
                     40:            }
                     41:          printf ("\n.DS L\n");
                     42:        }
                     43:       else
                     44:        putchar (ch);
                     45:     }
                     46:   return 0;
                     47: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.