bfd/doc/doc.str

   1 - Documentation extraction program for chew.
   2 -  Copyright (C) 1990-2023 Free Software Foundation, Inc.
   3 -  This file is part of BFD, the Binary File Descriptor library.
   4
   5 -  This program is free software; you can redistribute it and/or modify
   6 -  it under the terms of the GNU General Public License as published by
   7 -  the Free Software Foundation; either version 3 of the License, or
   8 -  (at your option) any later version.
   9
  10 -  This program is distributed in the hope that it will be useful,
  11 -  but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 -  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 -  GNU General Public License for more details.
  14
  15 -  You should have received a copy of the GNU General Public License
  16 -  along with this program; if not, write to the Free Software
  17 -  Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
  18
  19 - chew.c keywords defined here put output into doc/*.texi files
  20 - from comments in the source.  See also proto.str.
  21
  22 -  True if SYNOPSIS was seen.
  23 variable synopsis_seen
  24
  25 : DOCDD
  26         skip_past_newline
  27         get_stuff_in_command kill_bogus_lines catstr
  28         ;
  29
  30 : ENDDD
  31         skip_past_newline
  32         ;
  33
  34 : EXAMPLE
  35         skip_past_newline
  36         get_stuff_in_command kill_bogus_lines do_fancy_stuff translatecomments
  37         courierize catstr
  38         ;
  39
  40 : INODE
  41         "@node " catstr skip_past_newline copy_past_newline catstr
  42         ;
  43
  44 : CODE_FRAGMENT
  45         EXAMPLE
  46         ;
  47
  48 : COMMENT
  49         skip_past_newline
  50         get_stuff_in_command
  51         drop
  52         ;
  53
  54 : SYNOPSIS
  55         skip_past_newline
  56         1 synopsis_seen !
  57         "@deftypefn {Function} " catstr
  58         get_stuff_in_command
  59         kill_bogus_lines
  60         collapse_whitespace
  61         indent
  62         catstr
  63         "\n" catstr
  64         ;
  65
  66 : func
  67         "@findex "      - a
  68         skip_past_newline
  69         copy_past_newline
  70         dup             - a x x
  71         "@subsubsection @code{" - a x x b
  72         swap
  73         remchar
  74         "}\n" - a x b x c
  75         catstr  catstr  catstr  catstr  catstr
  76         ;
  77
  78 : bodytext
  79         get_stuff_in_command
  80         bulletize
  81         kill_bogus_lines
  82         do_fancy_stuff
  83         courierize
  84         catstr
  85         "\n" catstr
  86         ;
  87
  88 : asection
  89         skip_past_newline
  90         catstr
  91         copy_past_newline
  92         do_fancy_stuff catstr
  93         bodytext
  94         ;
  95
  96 : SECTION
  97         "@section " asection  ;
  98
  99 : SUBSECTION
 100         "@subsection " asection  ;
 101
 102 : SUBSUBSECTION
 103         "@subsubsection " asection  ;
 104
 105 : subhead
 106         skip_past_newline
 107         bodytext
 108         ;
 109
 110 : DESCRIPTION
 111         subhead
 112         "@end deftypefn\n" synopsis_seen @ catstrif
 113         0 synopsis_seen !
 114         ;
 115
 116 : FUNCTION
 117         func ;
 118
 119 : INTERNAL_FUNCTION
 120         func ;
 121
 122 : DEFINITION
 123         func ;
 124
 125 : INTERNAL_DEFINITION
 126         func ;
 127
 128 : EXTERNAL
 129         COMMENT ;
 130
 131 : INTERNAL
 132         COMMENT ;
 133
 134 : SENUM
 135         skip_past_newline
 136         "Here are the possible values for @code{enum "
 137         copy_past_newline remchar catstr
 138         "}:\n\n" catstr catstr
 139         ;
 140 : ENUM
 141         skip_past_newline
 142         "@deffn {} "
 143         copy_past_newline catstr catstr
 144         ;
 145 : ENUMX
 146         skip_past_newline
 147         "@deffnx {} "
 148         copy_past_newline catstr
 149         catstr
 150         ;
 151 : ENUMEQ
 152         skip_past_newline
 153         "@deffn {} "
 154         copy_past_newline catstr catstr
 155         skip_past_newline
 156         ;
 157 : ENUMEQX
 158         skip_past_newline
 159         "@deffnx {} "
 160         copy_past_newline catstr
 161         catstr
 162         skip_past_newline
 163         ;
 164 : ENUMDOC
 165         skip_past_newline
 166         get_stuff_in_command
 167         strip_trailing_newlines
 168         catstr
 169         "\n@end deffn\n" catstr
 170         ;