@ -1,5 +1,5 @@
/*
/*
* " $Id: mxmldoc.c,v 1.36 2004/05/02 22:02:36 mike Exp $ "
* " $Id: mxmldoc.c,v 1.37 2004/06/01 20:19:34 mike Exp $ "
*
*
* Documentation generator using Mini - XML , a small XML - like file parsing
* Documentation generator using Mini - XML , a small XML - like file parsing
* library .
* library .
@ -1779,19 +1779,18 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
*/
*/
puts ( " <!DOCTYPE html PUBLIC \" -//W3C//DTD XHTML 1.0 Strict//EN \" "
puts ( " <!DOCTYPE html PUBLIC \" -//W3C//DTD XHTML 1.0 Strict//EN \" "
" \" http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd \" > " ) ;
" \" http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd \" > \n "
puts ( " <html xmlns='http://www.w3.org/1999/xhtml' xml:lang='en' lang='en'> " ) ;
" <html xmlns='http://www.w3.org/1999/xhtml' xml:lang='en' lang='en'> \n "
puts ( " <head> " ) ;
" <head> \n "
puts ( " \t <title>Documentation</title> " ) ;
" \t <title>Documentation</title> \n "
puts ( " \t <meta name='creator' content=' " MXML_VERSION " '/> " ) ;
" \t <meta name='creator' content=' " MXML_VERSION " '/> \n "
puts ( " \t <style><!-- " ) ;
" \t <style><!-- \n "
puts ( " \t h1, h2, h3, p { font-family: sans-serif; text-align: justify; } " ) ;
" \t h1, h2, h3, p { font-family: sans-serif; text-align: justify; } \n "
puts ( " \t tt, pre a:link, pre a:visited, tt a:link, tt a:visited { font-weight: bold; color: #7f0000; } " ) ;
" \t tt, pre a:link, pre a:visited, tt a:link, tt a:visited { font-weight: bold; color: #7f0000; } \n "
puts ( " \t pre { font-weight: bold; color: #7f0000; margin-left: 2em; } " ) ;
" \t pre { font-weight: bold; color: #7f0000; margin-left: 2em; } \n "
puts ( " \t --></style> " ) ;
" \t --></style> \n "
puts ( " </head> " ) ;
" </head> \n "
puts ( " <body> " ) ;
" <body> " ) ;
/*
/*
* Table of contents . . .
* Table of contents . . .
@ -1821,9 +1820,9 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
if ( mxmlFindElement ( doc , doc , " class " , NULL , NULL , MXML_DESCEND_FIRST ) )
if ( mxmlFindElement ( doc , doc , " class " , NULL , NULL , MXML_DESCEND_FIRST ) )
{
{
puts ( " <!-- NEW PAGE --> " ) ;
puts ( " <!-- NEW PAGE --> \n "
puts ( " <h2><a name='_classes'>Classes</a></h2> " ) ;
" <h2><a name='_classes'>Classes</a></h2> \n "
puts ( " <ul> " ) ;
" <ul> " ) ;
for ( scut = mxmlFindElement ( doc , doc , " class " , NULL , NULL ,
for ( scut = mxmlFindElement ( doc , doc , " class " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -1844,24 +1843,23 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
MXML_NO_DESCEND ) )
MXML_NO_DESCEND ) )
{
{
cname = mxmlElementGetAttr ( scut , " name " ) ;
cname = mxmlElementGetAttr ( scut , " name " ) ;
puts ( " <!-- NEW PAGE --> " ) ;
printf ( " <!-- NEW PAGE --> \n "
printf ( " <h3><a name='%s'>%s</a></h3> \n " , cname , cname ) ;
" <h3><a name='%s'>%s</a></h3> \n "
puts ( " <hr noshade/> " ) ;
" <hr noshade/> \n " , cname , cname ) ;
description = mxmlFindElement ( scut , scut , " description " , NULL ,
description = mxmlFindElement ( scut , scut , " description " , NULL ,
NULL , MXML_DESCEND_FIRST ) ;
NULL , MXML_DESCEND_FIRST ) ;
if ( description )
if ( description )
{
{
puts ( " <h4>Description</h4> " ) ;
f puts( " <h4>Description</h4> \n "
fputs ( " <p> " , stdout ) ;
" <p> " , stdout ) ;
write_element ( NULL , description ) ;
write_element ( NULL , description ) ;
puts ( " </p> " ) ;
puts ( " </p> " ) ;
}
}
puts ( " <h4>Definition</h4> " ) ;
printf ( " <h4>Definition</h4> \n "
puts ( " <pre> " ) ;
" <pre> \n "
" class %s " , cname ) ;
printf ( " class %s " , cname ) ;
if ( ( parent = mxmlElementGetAttr ( scut , " parent " ) ) ! = NULL )
if ( ( parent = mxmlElementGetAttr ( scut , " parent " ) ) ! = NULL )
printf ( " %s " , parent ) ;
printf ( " %s " , parent ) ;
puts ( " \n { " ) ;
puts ( " \n { " ) ;
@ -1948,14 +1946,12 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
}
}
}
}
puts ( " }; \n </pre> " ) ;
puts ( " }; \n </pre> \n "
" <h4>Members</h4> \n "
puts ( " <h4>Members</h4> " ) ;
" <p class='table'><table align='center' border='1' "
" cellpadding='5' cellspacing='0' width='80%'> \n "
puts ( " <p class='table'><table align='center' border='1' "
" <thead><tr bgcolor='#cccccc'><th>Name</th><th>Description</th></tr></thead> \n "
" cellpadding='5' cellspacing='0' width='80%'> " ) ;
" <tbody> " ) ;
puts ( " <thead><tr bgcolor='#cccccc'><th>Name</th><th>Description</th></tr></thead> " ) ;
puts ( " <tbody> " ) ;
for ( arg = mxmlFindElement ( scut , scut , " variable " , NULL , NULL ,
for ( arg = mxmlFindElement ( scut , scut , " variable " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2001,7 +1997,6 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
}
}
puts ( " </tbody></table></p> " ) ;
puts ( " </tbody></table></p> " ) ;
}
}
}
}
@ -2011,9 +2006,9 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
if ( mxmlFindElement ( doc , doc , " enumeration " , NULL , NULL , MXML_DESCEND_FIRST ) )
if ( mxmlFindElement ( doc , doc , " enumeration " , NULL , NULL , MXML_DESCEND_FIRST ) )
{
{
puts ( " <!-- NEW PAGE --> " ) ;
puts ( " <!-- NEW PAGE --> \n "
puts ( " <h2><a name='_enumerations'>Enumerations</a></h2> " ) ;
" <h2><a name='_enumerations'>Enumerations</a></h2> \n "
puts ( " <ul> " ) ;
" <ul> " ) ;
for ( scut = mxmlFindElement ( doc , doc , " enumeration " , NULL , NULL ,
for ( scut = mxmlFindElement ( doc , doc , " enumeration " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2034,26 +2029,25 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
MXML_NO_DESCEND ) )
MXML_NO_DESCEND ) )
{
{
name = mxmlElementGetAttr ( scut , " name " ) ;
name = mxmlElementGetAttr ( scut , " name " ) ;
puts ( " <!-- NEW PAGE --> " ) ;
printf ( " <!-- NEW PAGE --> \n "
printf ( " <h3><a name='%s'>%s</a></h3> \n " , name , name ) ;
" <h3><a name='%s'>%s</a></h3> \n "
puts ( " <hr noshade/> " ) ;
" <hr noshade/> \n " , name , name ) ;
description = mxmlFindElement ( scut , scut , " description " , NULL ,
description = mxmlFindElement ( scut , scut , " description " , NULL ,
NULL , MXML_DESCEND_FIRST ) ;
NULL , MXML_DESCEND_FIRST ) ;
if ( description )
if ( description )
{
{
puts ( " <h4>Description</h4> " ) ;
f puts( " <h4>Description</h4> \n "
fputs ( " <p> " , stdout ) ;
" <p> " , stdout ) ;
write_element ( NULL , description ) ;
write_element ( NULL , description ) ;
puts ( " </p> " ) ;
puts ( " </p> " ) ;
}
}
puts ( " <h4>Values</h4> " ) ;
puts ( " <h4>Values</h4> \n "
" <p class='table'><table align='center' border='1' width='80%' "
puts ( " <p class='table'><table align='center' border='1' width='80%' "
" cellpadding='5' cellspacing='0' width='80%'> \n "
" cellpadding='5' cellspacing='0' width='80%'> " ) ;
" <thead><tr bgcolor='#cccccc'><th>Name</th><th>Description</th></tr></thead> \n "
puts ( " <thead><tr bgcolor='#cccccc'><th>Name</th><th>Description</th></tr></thead> " ) ;
" <tbody> " ) ;
puts ( " <tbody> " ) ;
for ( arg = mxmlFindElement ( scut , scut , " constant " , NULL , NULL ,
for ( arg = mxmlFindElement ( scut , scut , " constant " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2079,9 +2073,9 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
if ( mxmlFindElement ( doc , doc , " function " , NULL , NULL , MXML_DESCEND_FIRST ) )
if ( mxmlFindElement ( doc , doc , " function " , NULL , NULL , MXML_DESCEND_FIRST ) )
{
{
puts ( " <!-- NEW PAGE --> " ) ;
puts ( " <!-- NEW PAGE --> \n "
puts ( " <h2><a name='_functions'>Functions</a></h2> " ) ;
" <h2><a name='_functions'>Functions</a></h2> \n "
puts ( " <ul> " ) ;
" <ul> " ) ;
for ( function = mxmlFindElement ( doc , doc , " function " , NULL , NULL ,
for ( function = mxmlFindElement ( doc , doc , " function " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2102,22 +2096,22 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
MXML_NO_DESCEND ) )
MXML_NO_DESCEND ) )
{
{
name = mxmlElementGetAttr ( function , " name " ) ;
name = mxmlElementGetAttr ( function , " name " ) ;
puts ( " <!-- NEW PAGE --> " ) ;
printf ( " <!-- NEW PAGE --> \n "
printf ( " <h3><a name='%s'>%s()</a></h3> \n " , name , name ) ;
" <h3><a name='%s'>%s()</a></h3> \n "
puts ( " <hr noshade/> " ) ;
" <hr noshade/> \n " , name , name ) ;
description = mxmlFindElement ( function , function , " description " , NULL ,
description = mxmlFindElement ( function , function , " description " , NULL ,
NULL , MXML_DESCEND_FIRST ) ;
NULL , MXML_DESCEND_FIRST ) ;
if ( description )
if ( description )
{
{
puts ( " <h4>Description</h4> " ) ;
f puts( " <h4>Description</h4> \n "
fputs ( " <p> " , stdout ) ;
" <p> " , stdout ) ;
write_element ( NULL , description ) ;
write_element ( NULL , description ) ;
puts ( " </p> " ) ;
puts ( " </p> " ) ;
}
}
puts ( " <h4>Syntax</h4> " ) ;
puts ( " <h4>Syntax</h4> \n "
puts ( " <pre> " ) ;
" <pre> " ) ;
arg = mxmlFindElement ( function , function , " returnvalue " , NULL ,
arg = mxmlFindElement ( function , function , " returnvalue " , NULL ,
NULL , MXML_DESCEND_FIRST ) ;
NULL , MXML_DESCEND_FIRST ) ;
@ -2161,9 +2155,9 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
else
else
{
{
puts ( " <p class='table'><table align='center' border='1' width='80%' "
puts ( " <p class='table'><table align='center' border='1' width='80%' "
" cellpadding='5' cellspacing='0' width='80%'> " ) ;
" cellpadding='5' cellspacing='0' width='80%'> \n "
puts ( " <thead><tr bgcolor='#cccccc'><th>Name</th><th>Description</th></tr></thead> " ) ;
" <thead><tr bgcolor='#cccccc'><th>Name</th><th>Description</th></tr></thead> \n "
puts ( " <tbody> " ) ;
" <tbody> " ) ;
for ( arg = mxmlFindElement ( function , function , " argument " , NULL , NULL ,
for ( arg = mxmlFindElement ( function , function , " argument " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2205,9 +2199,9 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
if ( mxmlFindElement ( doc , doc , " struct " , NULL , NULL , MXML_DESCEND_FIRST ) )
if ( mxmlFindElement ( doc , doc , " struct " , NULL , NULL , MXML_DESCEND_FIRST ) )
{
{
puts ( " <!-- NEW PAGE --> " ) ;
puts ( " <!-- NEW PAGE --> \n "
puts ( " <h2><a name='_structures'>Structures</a></h2> " ) ;
" <h2><a name='_structures'>Structures</a></h2> \n "
puts ( " <ul> " ) ;
" <ul> " ) ;
for ( scut = mxmlFindElement ( doc , doc , " struct " , NULL , NULL ,
for ( scut = mxmlFindElement ( doc , doc , " struct " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2228,24 +2222,23 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
MXML_NO_DESCEND ) )
MXML_NO_DESCEND ) )
{
{
cname = mxmlElementGetAttr ( scut , " name " ) ;
cname = mxmlElementGetAttr ( scut , " name " ) ;
puts ( " <!-- NEW PAGE --> " ) ;
printf ( " <!-- NEW PAGE --> \n "
printf ( " <h3><a name='%s'>%s</a></h3> \n " , cname , cname ) ;
" <h3><a name='%s'>%s</a></h3> \n "
puts ( " <hr noshade/> " ) ;
" <hr noshade/> \n " , cname , cname ) ;
description = mxmlFindElement ( scut , scut , " description " , NULL ,
description = mxmlFindElement ( scut , scut , " description " , NULL ,
NULL , MXML_DESCEND_FIRST ) ;
NULL , MXML_DESCEND_FIRST ) ;
if ( description )
if ( description )
{
{
puts ( " <h4>Description</h4> " ) ;
f puts( " <h4>Description</h4> \n "
fputs ( " <p> " , stdout ) ;
" <p> " , stdout ) ;
write_element ( NULL , description ) ;
write_element ( NULL , description ) ;
puts ( " </p> " ) ;
puts ( " </p> " ) ;
}
}
puts ( " <h4>Definition</h4> " ) ;
printf ( " <h4>Definition</h4> \n "
puts ( " <pre> " ) ;
" <pre> \n "
" struct %s \n { \n " , cname ) ;
printf ( " struct %s \n { \n " , cname ) ;
for ( arg = mxmlFindElement ( scut , scut , " variable " , NULL , NULL ,
for ( arg = mxmlFindElement ( scut , scut , " variable " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
arg ;
arg ;
@ -2311,14 +2304,12 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
puts ( " ); " ) ;
puts ( " ); " ) ;
}
}
puts ( " }; \n </pre> " ) ;
puts ( " }; \n </pre> \n "
" <h4>Members</h4> \n "
puts ( " <h4>Members</h4> " ) ;
" <p class='table'><table align='center' border='1' width='80%' "
" cellpadding='5' cellspacing='0' width='80%'> \n "
puts ( " <p class='table'><table align='center' border='1' width='80%' "
" <thead><tr bgcolor='#cccccc'><th>Name</th><th>Description</th></tr></thead> \n "
" cellpadding='5' cellspacing='0' width='80%'> " ) ;
" <tbody> " ) ;
puts ( " <thead><tr bgcolor='#cccccc'><th>Name</th><th>Description</th></tr></thead> " ) ;
puts ( " <tbody> " ) ;
for ( arg = mxmlFindElement ( scut , scut , " variable " , NULL , NULL ,
for ( arg = mxmlFindElement ( scut , scut , " variable " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2373,9 +2364,9 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
if ( mxmlFindElement ( doc , doc , " typedef " , NULL , NULL , MXML_DESCEND_FIRST ) )
if ( mxmlFindElement ( doc , doc , " typedef " , NULL , NULL , MXML_DESCEND_FIRST ) )
{
{
puts ( " <!-- NEW PAGE --> " ) ;
puts ( " <!-- NEW PAGE --> \n "
puts ( " <h2><a name='_types'>Types</a></h2> " ) ;
" <h2><a name='_types'>Types</a></h2> \n "
puts ( " <ul> " ) ;
" <ul> " ) ;
for ( scut = mxmlFindElement ( doc , doc , " typedef " , NULL , NULL ,
for ( scut = mxmlFindElement ( doc , doc , " typedef " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2396,24 +2387,23 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
MXML_NO_DESCEND ) )
MXML_NO_DESCEND ) )
{
{
name = mxmlElementGetAttr ( scut , " name " ) ;
name = mxmlElementGetAttr ( scut , " name " ) ;
puts ( " <!-- NEW PAGE --> " ) ;
printf ( " <!-- NEW PAGE --> \n "
printf ( " <h3><a name='%s'>%s</a></h3> \n " , name , name ) ;
" <h3><a name='%s'>%s</a></h3> \n "
puts ( " <hr noshade/> " ) ;
" <hr noshade/> \n " , name , name ) ;
description = mxmlFindElement ( scut , scut , " description " , NULL ,
description = mxmlFindElement ( scut , scut , " description " , NULL ,
NULL , MXML_DESCEND_FIRST ) ;
NULL , MXML_DESCEND_FIRST ) ;
if ( description )
if ( description )
{
{
puts ( " <h4>Description</h4> " ) ;
f puts( " <h4>Description</h4> \n "
fputs ( " <p> " , stdout ) ;
" <p> " , stdout ) ;
write_element ( NULL , description ) ;
write_element ( NULL , description ) ;
puts ( " </p> " ) ;
puts ( " </p> " ) ;
}
}
puts ( " <h4>Definition</h4> " ) ;
fputs ( " <h4>Definition</h4> \n "
puts ( " <pre> " ) ;
" <pre> \n "
" typedef " , stdout ) ;
printf ( " typedef " ) ;
write_element ( doc , mxmlFindElement ( scut , scut , " type " , NULL ,
write_element ( doc , mxmlFindElement ( scut , scut , " type " , NULL ,
NULL , MXML_DESCEND_FIRST ) ) ;
NULL , MXML_DESCEND_FIRST ) ) ;
printf ( " %s; \n </pre> \n " , name ) ;
printf ( " %s; \n </pre> \n " , name ) ;
@ -2426,9 +2416,9 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
if ( mxmlFindElement ( doc , doc , " union " , NULL , NULL , MXML_DESCEND_FIRST ) )
if ( mxmlFindElement ( doc , doc , " union " , NULL , NULL , MXML_DESCEND_FIRST ) )
{
{
puts ( " <!-- NEW PAGE --> " ) ;
puts ( " <!-- NEW PAGE --> \n "
puts ( " <h2><a name='_unions'>Unions</a></h2> " ) ;
" <h2><a name='_unions'>Unions</a></h2> \n "
puts ( " <ul> " ) ;
" <ul> " ) ;
for ( scut = mxmlFindElement ( doc , doc , " union " , NULL , NULL ,
for ( scut = mxmlFindElement ( doc , doc , " union " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2449,24 +2439,23 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
MXML_NO_DESCEND ) )
MXML_NO_DESCEND ) )
{
{
name = mxmlElementGetAttr ( scut , " name " ) ;
name = mxmlElementGetAttr ( scut , " name " ) ;
puts ( " <!-- NEW PAGE --> " ) ;
printf ( " <!-- NEW PAGE --> \n "
printf ( " <h3><a name='%s'>%s</a></h3> \n " , name , name ) ;
" <h3><a name='%s'>%s</a></h3> \n "
puts ( " <hr noshade/> " ) ;
" <hr noshade/> \n " , name , name ) ;
description = mxmlFindElement ( scut , scut , " description " , NULL ,
description = mxmlFindElement ( scut , scut , " description " , NULL ,
NULL , MXML_DESCEND_FIRST ) ;
NULL , MXML_DESCEND_FIRST ) ;
if ( description )
if ( description )
{
{
puts ( " <h4>Description</h4> " ) ;
f puts( " <h4>Description</h4> \n "
fputs ( " <p> " , stdout ) ;
" <p> " , stdout ) ;
write_element ( NULL , description ) ;
write_element ( NULL , description ) ;
puts ( " </p> " ) ;
puts ( " </p> " ) ;
}
}
puts ( " <h4>Definition</h4> " ) ;
printf ( " <h4>Definition</h4> \n "
puts ( " <pre> " ) ;
" <pre> \n "
" union %s \n { \n " , name ) ;
printf ( " union %s \n { \n " , name ) ;
for ( arg = mxmlFindElement ( scut , scut , " variable " , NULL , NULL ,
for ( arg = mxmlFindElement ( scut , scut , " variable " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
arg ;
arg ;
@ -2479,14 +2468,12 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
printf ( " %s; \n " , mxmlElementGetAttr ( arg , " name " ) ) ;
printf ( " %s; \n " , mxmlElementGetAttr ( arg , " name " ) ) ;
}
}
puts ( " }; \n </pre> " ) ;
puts ( " }; \n </pre> \n "
" <h4>Members</h4> \n "
puts ( " <h4>Members</h4> " ) ;
" <p class='table'><table align='center' border='1' width='80%' "
" cellpadding='5' cellspacing='0' width='80%'> \n "
puts ( " <p class='table'><table align='center' border='1' width='80%' "
" <thead><tr bgcolor='#cccccc'><th>Name</th><th>Description</th></tr></thead> \n "
" cellpadding='5' cellspacing='0' width='80%'> " ) ;
" <tbody> " ) ;
puts ( " <thead><tr bgcolor='#cccccc'><th>Name</th><th>Description</th></tr></thead> " ) ;
puts ( " <tbody> " ) ;
for ( arg = mxmlFindElement ( scut , scut , " variable " , NULL , NULL ,
for ( arg = mxmlFindElement ( scut , scut , " variable " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2512,9 +2499,9 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
if ( mxmlFindElement ( doc , doc , " variable " , NULL , NULL , MXML_DESCEND_FIRST ) )
if ( mxmlFindElement ( doc , doc , " variable " , NULL , NULL , MXML_DESCEND_FIRST ) )
{
{
puts ( " <!-- NEW PAGE --> " ) ;
puts ( " <!-- NEW PAGE --> \n "
puts ( " <h2><a name='_variables'>Variables</a></h2> " ) ;
" <h2><a name='_variables'>Variables</a></h2> \n "
puts ( " <ul> " ) ;
" <ul> " ) ;
for ( arg = mxmlFindElement ( doc , doc , " variable " , NULL , NULL ,
for ( arg = mxmlFindElement ( doc , doc , " variable " , NULL , NULL ,
MXML_DESCEND_FIRST ) ;
MXML_DESCEND_FIRST ) ;
@ -2535,22 +2522,22 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
MXML_NO_DESCEND ) )
MXML_NO_DESCEND ) )
{
{
name = mxmlElementGetAttr ( arg , " name " ) ;
name = mxmlElementGetAttr ( arg , " name " ) ;
puts ( " <!-- NEW PAGE --> " ) ;
printf ( " <!-- NEW PAGE --> \n "
printf ( " <h3><a name='%s'>%s</a></h3> \n " , name , name ) ;
" <h3><a name='%s'>%s</a></h3> \n "
puts ( " <hr noshade/> " ) ;
" <hr noshade/> " , name , name ) ;
description = mxmlFindElement ( arg , arg , " description " , NULL ,
description = mxmlFindElement ( arg , arg , " description " , NULL ,
NULL , MXML_DESCEND_FIRST ) ;
NULL , MXML_DESCEND_FIRST ) ;
if ( description )
if ( description )
{
{
puts ( " <h4>Description</h4> " ) ;
f puts( " <h4>Description</h4> \n "
fputs ( " <p> " , stdout ) ;
" <p> " , stdout ) ;
write_element ( NULL , description ) ;
write_element ( NULL , description ) ;
puts ( " </p> " ) ;
puts ( " </p> " ) ;
}
}
puts ( " <h4>Definition</h4> " ) ;
puts ( " <h4>Definition</h4> \n "
puts ( " <pre> " ) ;
" <pre> " ) ;
write_element ( doc , mxmlFindElement ( arg , arg , " type " , NULL ,
write_element ( doc , mxmlFindElement ( arg , arg , " type " , NULL ,
NULL , MXML_DESCEND_FIRST ) ) ;
NULL , MXML_DESCEND_FIRST ) ) ;
@ -2565,8 +2552,8 @@ write_documentation(mxml_node_t *doc) /* I - XML documentation */
* Standard footer . . .
* Standard footer . . .
*/
*/
puts ( " </body> " ) ;
puts ( " </body> \n "
puts ( " </html> " ) ;
" </html> " ) ;
}
}
@ -2748,5 +2735,5 @@ ws_cb(mxml_node_t *node, /* I - Element node */
/*
/*
* End of " $Id: mxmldoc.c,v 1.36 2004/05/02 22:02:36 mike Exp $ " .
* End of " $Id: mxmldoc.c,v 1.37 2004/06/01 20:19:34 mike Exp $ " .
*/
*/