Hugs supports the latexish "\begin{code} .. \end{code}" in .lhs files.
by adding this code to "input.c" you could also support HTML
.
.
.
.
else if (linecmp("<CODE>", lineBuffer)) {
if (!inCodeBlock) { /* Entered a code block */
inCodeBlock = TRUE;
lineBuffer[0]='\n'; /* pretend it's a blank line */
lineBuffer[1]='\0';
lineLength=1;
}
else {
ERRMSG(row) "<CODE> encountered inside code block"
EEND;
}
}
else if (linecmp("</CODE>", lineBuffer)) {
if (inCodeBlock) { /* Finished code block */
inCodeBlock = FALSE;
lineBuffer[0]='\n'; /* pretend it's a blank line */
lineBuffer[1]='\0';
lineLength=1;
}
else {
ERRMSG(row) "</CODE> encountered outside code block"
EEND;
}
}
.
.
..
.
byron