[MLton] Finished (?) MLton.Child

[Wesley W. Terpstra]

--rwEMma7ioTxnRzrJ
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline

On Wed, Nov 24, 2004 at 05:53:59PM -0800, Stephen Weeks wrote:
> Hopefully it won't be too hard to cleanup whatever bugs I introduced.

Here's an easy one from where you renamed the methods.
You missed the stubs file -- that breaks upgrading mlton under linux.

-- 
Wesley W. Terpstra

--rwEMma7ioTxnRzrJ
Content-Type: text/plain; charset=us-ascii
Content-Disposition: attachment; filename="misnamed.patch"

Index: lib/mlton-stubs/mlton.sml
===================================================================
RCS file: /cvsroot/mlton/mlton/lib/mlton-stubs/mlton.sml,v
retrieving revision 1.39
diff -r1.39 mlton.sml
275,276c275,276
< 		  val binIOin = fn _ => raise Fail "Child.binIOin"
< 		  val binIOout = fn _ => raise Fail "Child.binIOout"
---
> 		  val binIn = fn _ => raise Fail "Child.binIn"
> 		  val binOut = fn _ => raise Fail "Child.binOut"
279,280c279,280
< 		  val textIOin = fn _ => raise Fail "Child.textIOin"
< 		  val textIOout = fn _ => raise Fail "Child.textIOout"
---
> 		  val textIn = fn _ => raise Fail "Child.textIn"
> 		  val textOut = fn _ => raise Fail "Child.textOut"

--rwEMma7ioTxnRzrJ--