mirror of
https://github.com/autc04/Retro68.git
synced 2024-09-10 03:54:48 +00:00
170 lines
2.2 KiB
Plaintext
170 lines
2.2 KiB
Plaintext
|
: nokill_bogus_lines ;
|
||
|
|
||
|
: ENDDD
|
||
|
skip_past_newline
|
||
|
;
|
||
|
|
||
|
: TABLE
|
||
|
skip_past_newline
|
||
|
"@table @code\n" catstr
|
||
|
;
|
||
|
|
||
|
: ENDTABLE
|
||
|
skip_past_newline
|
||
|
"@end table\n"
|
||
|
catstr
|
||
|
;
|
||
|
|
||
|
: QUICKREF
|
||
|
skip_past_newline
|
||
|
get_stuff_in_command
|
||
|
"&&~&&~&&\cr\tablerule\n"
|
||
|
quickref
|
||
|
;
|
||
|
|
||
|
: EXAMPLE
|
||
|
skip_past_newline
|
||
|
|
||
|
get_stuff_in_command nokill_bogus_lines translatecomments
|
||
|
courierize catstr
|
||
|
|
||
|
;
|
||
|
|
||
|
: INODE
|
||
|
"@node " catstr skip_past_newline copy_past_newline catstr
|
||
|
;
|
||
|
|
||
|
: CODE_FRAGMENT
|
||
|
EXAMPLE
|
||
|
;
|
||
|
|
||
|
: SYNOPSIS
|
||
|
skip_past_newline
|
||
|
"@strong{Synopsis}\n" catstr
|
||
|
"@example\n" catstr
|
||
|
get_stuff_in_command
|
||
|
do_fancy_stuff
|
||
|
nokill_bogus_lines
|
||
|
indent
|
||
|
catstr
|
||
|
"@end example\n" catstr
|
||
|
|
||
|
;
|
||
|
|
||
|
: ANSI_SYNOPSIS
|
||
|
skip_past_newline
|
||
|
"@strong{Synopsis}\n" catstr
|
||
|
"@example\n" catstr
|
||
|
get_stuff_in_command
|
||
|
do_fancy_stuff
|
||
|
nokill_bogus_lines
|
||
|
indent
|
||
|
catstr
|
||
|
"@end example\n" catstr
|
||
|
|
||
|
;
|
||
|
|
||
|
: OLDTRAD_SYNOPSIS
|
||
|
skip_past_newline
|
||
|
"@strong{Traditional Synopsis}\n" catstr
|
||
|
"@example\n" catstr
|
||
|
get_stuff_in_command
|
||
|
do_fancy_stuff
|
||
|
nokill_bogus_lines
|
||
|
indent
|
||
|
catstr
|
||
|
"@end example\n" catstr
|
||
|
|
||
|
;
|
||
|
|
||
|
: TRAD_SYNOPSIS
|
||
|
skip_past_newline
|
||
|
|
||
|
;
|
||
|
|
||
|
: INDEX
|
||
|
"@findex " skip_past_newline copy_past_newline catstr catstr
|
||
|
;
|
||
|
|
||
|
: FUNCTION
|
||
|
"@node " - a
|
||
|
skip_past_newline
|
||
|
copy_past_newline
|
||
|
dup - a x x
|
||
|
get_stuff_in_angle -a x y
|
||
|
swap
|
||
|
do_fancy_stuff
|
||
|
"@section " - a x x b
|
||
|
swap
|
||
|
remchar
|
||
|
"\n" - a x b x c
|
||
|
catstr catstr catstr catstr catstr
|
||
|
;
|
||
|
|
||
|
: bodytext
|
||
|
get_stuff_in_command
|
||
|
bulletize
|
||
|
courierize
|
||
|
do_fancy_stuff
|
||
|
catstr
|
||
|
"@*\n" catstr
|
||
|
;
|
||
|
|
||
|
: asection
|
||
|
skip_past_newline
|
||
|
catstr
|
||
|
copy_past_newline
|
||
|
do_fancy_stuff catstr
|
||
|
bodytext
|
||
|
;
|
||
|
|
||
|
: SECTION
|
||
|
"@section " asection ;
|
||
|
|
||
|
: SUBSECTION
|
||
|
"@section " asection ;
|
||
|
|
||
|
: SUBSUBSECTION
|
||
|
"@subsection " asection ;
|
||
|
|
||
|
: subhead
|
||
|
skip_past_newline
|
||
|
bodytext
|
||
|
;
|
||
|
|
||
|
: DESCRIPTION
|
||
|
"@strong{Description}@*\n" catstr subhead ;
|
||
|
|
||
|
: RETURNS
|
||
|
"@strong{Returns}@*\n" catstr subhead ;
|
||
|
|
||
|
: ERRORS
|
||
|
"@strong{Errors}@*\n" catstr subhead ;
|
||
|
|
||
|
: PORTABILITY
|
||
|
"@strong{Portability}@*\n" catstr subhead ;
|
||
|
|
||
|
: BUGS
|
||
|
"@strong{Bugs}@*\n" catstr subhead ;
|
||
|
|
||
|
: WARNINGS
|
||
|
"@strong{Warnings}@*\n" catstr subhead ;
|
||
|
|
||
|
: SEEALSO
|
||
|
"@strong{See Also}@*\n" catstr subhead ;
|
||
|
|
||
|
: INTERNAL_FUNCTION
|
||
|
func ;
|
||
|
|
||
|
: INTERNAL_DEFINITION
|
||
|
func ;
|
||
|
|
||
|
: INTERNAL
|
||
|
func ;
|
||
|
|
||
|
: TYPEDEF
|
||
|
FUNCTION ;
|
||
|
|
||
|
: NEWPAGE
|
||
|
"@page\n" catstr subhead ;
|