[MLton-commit] r4235

[Matthew Fluet]

Wrong return type in C prototype
----------------------------------------------------------------------

U   mlton/branches/on-20050822-x86_64-branch/mlton/backend/ssa-to-rssa.fun

----------------------------------------------------------------------

Modified: mlton/branches/on-20050822-x86_64-branch/mlton/backend/ssa-to-rssa.fun
===================================================================
--- mlton/branches/on-20050822-x86_64-branch/mlton/backend/ssa-to-rssa.fun	2005-11-16 01:29:35 UTC (rev 4234)
+++ mlton/branches/on-20050822-x86_64-branch/mlton/backend/ssa-to-rssa.fun	2005-11-16 01:57:08 UTC (rev 4235)
@@ -264,7 +264,7 @@
             prototype = let
                            open CType
                         in
-                           (Vector.new2 (Pointer, Pointer), NONE)
+                           (Vector.new2 (Pointer, Pointer), SOME Word32)
                         end,
             readsStackTop = false,
             return = Word32,