########################################################################
# SGMLSPL script produced automatically by the script sgmlspl.pl
#
# Document Type: HACK
# Edited by: 
########################################################################

use SGMLS;			# Use the SGMLS package.
use SGMLS::Output;		# Use stack-based output.

#
# Document Handlers.
#
sgml('start', sub {});
sgml('end', sub {});

#
# Element Handlers.
#

# Element: HACK
sgml('<HACK>', "");
sgml('</HACK>', "");

# Element: HEAD
sgml('<HEAD>', "");
sgml('</HEAD>', "");

# Element: TITLE
sgml('<TITLE>', "");
sgml('</TITLE>', "");

# Element: ACRO
sgml('<ACRO>', "");
sgml('</ACRO>', "");

# Element: BODY
sgml('<BODY>', "");
sgml('</BODY>', "");

# Element: PARA
sgml('<PARA>', "");
sgml('</PARA>', "");

# Element: BOLD
sgml('<BOLD>', "");
sgml('</BOLD>', "");

# Element: BR
sgml('<BR>', "");
sgml('</BR>', "");

# Element: SECTION
sgml('<SECTION>', "");
sgml('</SECTION>', "");

# Element: SECBODY
sgml('<SECBODY>', "");
sgml('</SECBODY>', "");

# Element: EMPH
sgml('<EMPH>', "");
sgml('</EMPH>', "");

# Element: CODE
sgml('<CODE>', "");
sgml('</CODE>', "");

#
# Default handlers (uncomment these if needed).  Right now, these are set
# up to gag on any unrecognised elements, sdata, processing-instructions,
# or entities.
#
# sgml('start_element',sub { die "Unknown element: " . $_[0]->name; });
# sgml('end_element','');
# sgml('cdata',sub { output $_[0]; });
# sgml('sdata',sub { die "Unknown SDATA: " . $_[0]; });
# sgml('re',"\n");
# sgml('pi',sub { die "Unknown processing instruction: " . $_[0]; });
# sgml('entity',sub { die "Unknown external entity: " . $_[0]->name; });
# sgml('start_subdoc',sub { die "Unknown subdoc entity: " . $_[0]->name; });
# sgml('end_subdoc','');
# sgml('conforming','');

1;
