ports/devel/ml-doc/files/patch-tools-lib-latex-text_to_latex.sml
Edwin Groothuis 32961afd4f New port: devel/ml-doc
ML-Doc is a system for documenting the interfaces of SML
	libraries. It can produce both HTML and LaTeX output.

	http://people.cs.uchicago.edu/~jhr/tools/ml-doc.html

PR:		ports/115932:
Submitted by:	Timothy Bourke <timbob@bigpond.com>
2007-09-07 12:01:00 +00:00

11 lines
498 B
Standard ML

--- tools/lib/latex/text-to-latex.sml.orig Tue Jul 24 14:14:47 2007
+++ tools/lib/latex/text-to-latex.sml Tue Jul 24 14:15:03 2007
@@ -538,7 +538,7 @@
trans(last, arg, colAlign)
| transCell (last, Flt.TD arg, colAlign) =
trans(last, arg, colAlign)
- fun doCells ([cell], [colAlign]) =
+ fun doCells ([cell], colAlign::_) =
ignore (transCell(true, cell, colAlign))
| doCells (cell::r1, colAlign::r2) = let
val nCols = transCell(false, cell, colAlign)