133965Sjdp: DOCDD 233965Sjdp skip_past_newline 333965Sjdp get_stuff_in_command kill_bogus_lines catstr 433965Sjdp ; 533965Sjdp 633965Sjdp: ENDDD 733965Sjdp skip_past_newline 833965Sjdp ; 933965Sjdp 1033965Sjdp: EXAMPLE 1133965Sjdp skip_past_newline 1233965Sjdp get_stuff_in_command kill_bogus_lines do_fancy_stuff translatecomments 1333965Sjdp courierize catstr 1433965Sjdp 1533965Sjdp ; 1633965Sjdp 1733965Sjdp: INODE 1833965Sjdp "@node " catstr skip_past_newline copy_past_newline catstr 1933965Sjdp ; 2033965Sjdp 2133965Sjdp: CODE_FRAGMENT 2233965Sjdp EXAMPLE 2333965Sjdp ; 2433965Sjdp 2533965Sjdp: COMMENT 2633965Sjdp skip_past_newline 2733965Sjdp get_stuff_in_command 2833965Sjdp drop 2933965Sjdp ; 3033965Sjdp 3133965Sjdp: SYNOPSIS 3233965Sjdp skip_past_newline 3333965Sjdp "@strong{Synopsis}\n" catstr 3433965Sjdp "@example\n" catstr 3533965Sjdp get_stuff_in_command 3633965Sjdp kill_bogus_lines 3733965Sjdp indent 3833965Sjdp catstr 3933965Sjdp "@end example\n" catstr 4033965Sjdp 4133965Sjdp ; 4233965Sjdp 4333965Sjdp: func 4433965Sjdp "@findex " - a 4533965Sjdp skip_past_newline 4633965Sjdp copy_past_newline 4733965Sjdp dup - a x x 4833965Sjdp "@subsubsection @code{" - a x x b 4933965Sjdp swap 5033965Sjdp remchar 5133965Sjdp "}\n" - a x b x c 5233965Sjdp catstr catstr catstr catstr catstr 5333965Sjdp ; 5433965Sjdp 5533965Sjdp: FUNCTION 5633965Sjdp "@findex " - a 5733965Sjdp skip_past_newline 5833965Sjdp copy_past_newline 5933965Sjdp dup - a x x 6033965Sjdp "@subsubsection @code{" - a x x b 6133965Sjdp swap 6233965Sjdp remchar 6333965Sjdp "}\n" - a x b x c 6433965Sjdp catstr catstr catstr catstr catstr 6533965Sjdp ; 6633965Sjdp 6733965Sjdp: bodytext 6833965Sjdp get_stuff_in_command 6933965Sjdp bulletize 7033965Sjdp kill_bogus_lines 7133965Sjdp do_fancy_stuff 7233965Sjdp courierize 7333965Sjdp catstr 7438889Sjdp "\n" catstr 7533965Sjdp ; 7633965Sjdp 7733965Sjdp: asection 7833965Sjdp skip_past_newline 7933965Sjdp catstr 8033965Sjdp copy_past_newline 8133965Sjdp do_fancy_stuff catstr 8233965Sjdp bodytext 8333965Sjdp ; 8433965Sjdp 8533965Sjdp: SECTION 8633965Sjdp "@section " asection ; 8733965Sjdp 8833965Sjdp: SUBSECTION 8933965Sjdp "@subsection " asection ; 9033965Sjdp 9133965Sjdp: SUBSUBSECTION 9233965Sjdp "@subsubsection " asection ; 9333965Sjdp 9433965Sjdp: subhead 9533965Sjdp skip_past_newline 9633965Sjdp bodytext 9733965Sjdp ; 9833965Sjdp 9933965Sjdp 10033965Sjdp 10133965Sjdp 10233965Sjdp: DESCRIPTION 10333965Sjdp "@strong{Description}@*\n" catstr subhead ; 10433965Sjdp 10533965Sjdp: RETURNS 10633965Sjdp "@strong{Returns}@*\n" catstr subhead ; 10733965Sjdp 10833965Sjdp: INTERNAL_FUNCTION 10933965Sjdp func ; 11033965Sjdp 11133965Sjdp 11233965Sjdp: INTERNAL_DEFINITION 11333965Sjdp func ; 11433965Sjdp 11533965Sjdp 11633965Sjdp: INTERNAL 11733965Sjdp func ; 11833965Sjdp 11933965Sjdp: TYPEDEF 12033965Sjdp FUNCTION ; 12133965Sjdp 12233965Sjdp: SENUM 12333965Sjdp skip_past_newline 12433965Sjdp "Here are the possible values for @code{enum " 12533965Sjdp copy_past_newline remchar catstr 12633965Sjdp "}:\n\n" catstr catstr 12733965Sjdp ; 12833965Sjdp: ENUM 12933965Sjdp skip_past_newline 13033965Sjdp "@deffn {} " 13133965Sjdp copy_past_newline catstr catstr 13233965Sjdp ; 13333965Sjdp: ENUMX 13433965Sjdp skip_past_newline 13533965Sjdp "@deffnx {} " 13633965Sjdp copy_past_newline catstr 13733965Sjdp catstr 13833965Sjdp ; 13933965Sjdp: ENUMEQ 14033965Sjdp skip_past_newline 14133965Sjdp "@deffn {} " 14233965Sjdp copy_past_newline catstr catstr 14333965Sjdp skip_past_newline 14433965Sjdp ; 14533965Sjdp: ENUMEQX 14633965Sjdp skip_past_newline 14733965Sjdp "@deffnx {} " 14833965Sjdp copy_past_newline catstr 14933965Sjdp catstr 15033965Sjdp skip_past_newline 15133965Sjdp ; 15233965Sjdp: ENUMDOC 15333965Sjdp skip_past_newline 15433965Sjdp get_stuff_in_command 15533965Sjdp strip_trailing_newlines 15633965Sjdp catstr 15733965Sjdp "\n@end deffn\n" catstr 15833965Sjdp ; 159