3d60de8161
NODE which allows nodes to be written to texinfo files.
113 lines
1.4 KiB
Plaintext
113 lines
1.4 KiB
Plaintext
: ENDDD
|
|
skip_past_newline
|
|
;
|
|
|
|
: EXAMPLE
|
|
skip_past_newline
|
|
|
|
get_stuff_in_command kill_bogus_lines translatecomments
|
|
courierize catstr
|
|
|
|
;
|
|
|
|
: NODE
|
|
"@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
|
|
kill_bogus_lines
|
|
indent
|
|
catstr
|
|
"@end example\n" catstr
|
|
|
|
;
|
|
|
|
: func
|
|
"@findex " - a
|
|
skip_past_newline
|
|
copy_past_newline
|
|
dup - a x x
|
|
"@subsubsection @code{" - a x x b
|
|
swap
|
|
remchar
|
|
"}\n" - a x b x c
|
|
catstr catstr catstr catstr catstr
|
|
;
|
|
|
|
: FUNCTION
|
|
"@findex " - a
|
|
skip_past_newline
|
|
copy_past_newline
|
|
dup - a x x
|
|
"@subsubsection @code{" - a x x b
|
|
swap
|
|
remchar
|
|
"}\n" - a x b x c
|
|
catstr catstr catstr catstr catstr
|
|
;
|
|
|
|
: bodytext
|
|
get_stuff_in_command
|
|
kill_bogus_lines
|
|
do_fancy_stuff
|
|
bulletize
|
|
courierize
|
|
catstr
|
|
"@*\n" catstr
|
|
;
|
|
|
|
: asection
|
|
skip_past_newline
|
|
catstr
|
|
copy_past_newline
|
|
do_fancy_stuff catstr
|
|
bodytext
|
|
;
|
|
|
|
: SECTION
|
|
"@section " asection ;
|
|
|
|
: SUBSECTION
|
|
"@subsection " asection ;
|
|
|
|
: SUBSUBSECTION
|
|
"@subsubsection " asection ;
|
|
|
|
: subhead
|
|
skip_past_newline
|
|
bodytext
|
|
;
|
|
|
|
|
|
|
|
|
|
: DESCRIPTION
|
|
"@strong{Description}@*\n" catstr subhead ;
|
|
|
|
: RETURNS
|
|
"@strong{Returns}@*\n" catstr subhead ;
|
|
|
|
: INTERNAL_FUNCTION
|
|
func ;
|
|
|
|
|
|
: INTERNAL_DEFINITION
|
|
func ;
|
|
|
|
|
|
: INTERNAL
|
|
func ;
|
|
|
|
: TYPEDEF
|
|
FUNCTION ;
|
|
|
|
|