[MLton-commit] r7510
Wesley Terpstra
wesley at mlton.org
Sun Mar 20 05:46:36 PST 2011
Apply the patch
----------------------------------------------------------------------
U mlton/trunk/package/debian/patches/11-fixes-20100608-to-20110319.patch
U mlton/trunk/package/debian/patches/series
----------------------------------------------------------------------
Modified: mlton/trunk/package/debian/patches/11-fixes-20100608-to-20110319.patch
===================================================================
--- mlton/trunk/package/debian/patches/11-fixes-20100608-to-20110319.patch 2011-03-20 13:16:31 UTC (rev 7509)
+++ mlton/trunk/package/debian/patches/11-fixes-20100608-to-20110319.patch 2011-03-20 13:46:36 UTC (rev 7510)
@@ -5,14 +5,14 @@
Index: regression/common-subexp0.ok
===================================================================
---- regression/common-subexp0.ok (.../tags/on-20100608-release) (revision 0)
-+++ regression/common-subexp0.ok (.../trunk) (revision 7506)
+--- mlton.orig/regression/common-subexp0.ok (.../tags/on-20100608-release) (revision 0)
++++ mlton/regression/common-subexp0.ok (.../trunk) (revision 7506)
@@ -0,0 +1 @@
+nan
Index: regression/weak.3.sml
===================================================================
---- regression/weak.3.sml (.../tags/on-20100608-release) (revision 0)
-+++ regression/weak.3.sml (.../trunk) (revision 7506)
+--- mlton.orig/regression/weak.3.sml (.../tags/on-20100608-release) (revision 0)
++++ mlton/regression/weak.3.sml (.../trunk) (revision 7506)
@@ -0,0 +1,23 @@
+fun find cache x =
+ case (List.find (fn (y,_) => x = y) (!cache)) of
@@ -39,8 +39,8 @@
+val _ = List.app (fn x => print (concat [Int.toString (lookup x), "\n"])) [5,4,3,2,1]
Index: regression/weak.3.ok
===================================================================
---- regression/weak.3.ok (.../tags/on-20100608-release) (revision 0)
-+++ regression/weak.3.ok (.../trunk) (revision 7506)
+--- mlton.orig/regression/weak.3.ok (.../tags/on-20100608-release) (revision 0)
++++ mlton/regression/weak.3.ok (.../trunk) (revision 7506)
@@ -0,0 +1,5 @@
+6
+5
@@ -49,15 +49,15 @@
+2
Index: regression/common-subexp0.sml
===================================================================
---- regression/common-subexp0.sml (.../tags/on-20100608-release) (revision 0)
-+++ regression/common-subexp0.sml (.../trunk) (revision 7506)
+--- mlton.orig/regression/common-subexp0.sml (.../tags/on-20100608-release) (revision 0)
++++ mlton/regression/common-subexp0.sml (.../trunk) (revision 7506)
@@ -0,0 +1,2 @@
+val x = !(ref 0.0) / !(ref 0.0)
+val _ = print (concat [Real.toString x, "\n"])
Index: regression/real-basic.x86-mingw.ok
===================================================================
---- regression/real-basic.x86-mingw.ok (.../tags/on-20100608-release) (revision 0)
-+++ regression/real-basic.x86-mingw.ok (.../trunk) (revision 7506)
+--- mlton.orig/regression/real-basic.x86-mingw.ok (.../tags/on-20100608-release) (revision 0)
++++ mlton/regression/real-basic.x86-mingw.ok (.../trunk) (revision 7506)
@@ -0,0 +1,32 @@
+Real32
+ Reported
@@ -93,8 +93,8 @@
+ min denormal: ~1074
Index: runtime/platform/mingw.c
===================================================================
---- runtime/platform/mingw.c (.../tags/on-20100608-release) (revision 7506)
-+++ runtime/platform/mingw.c (.../trunk) (revision 7506)
+--- mlton.orig/runtime/platform/mingw.c (.../tags/on-20100608-release) (revision 7506)
++++ mlton/runtime/platform/mingw.c (.../trunk) (revision 7506)
@@ -1308,26 +1308,75 @@
}
}
@@ -191,8 +191,8 @@
Index: mlton/atoms/real-x.fun
===================================================================
---- mlton/atoms/real-x.fun (.../tags/on-20100608-release) (revision 7506)
-+++ mlton/atoms/real-x.fun (.../trunk) (revision 7506)
+--- mlton.orig/mlton/atoms/real-x.fun (.../tags/on-20100608-release) (revision 7506)
++++ mlton/mlton/atoms/real-x.fun (.../trunk) (revision 7506)
@@ -1,4 +1,4 @@
-(* Copyright (C) 2009 Matthew Fluet.
+(* Copyright (C) 2009,2011 Matthew Fluet.
@@ -235,8 +235,8 @@
Index: mlton/main/main.fun
===================================================================
---- mlton/main/main.fun (.../tags/on-20100608-release) (revision 7506)
-+++ mlton/main/main.fun (.../trunk) (revision 7506)
+--- mlton.orig/mlton/main/main.fun (.../tags/on-20100608-release) (revision 7506)
++++ mlton/mlton/main/main.fun (.../trunk) (revision 7506)
@@ -737,7 +737,7 @@
Result.Yes () => ()
| Result.No s' => usage (concat ["invalid -ssa2-passes arg: ", s']))
@@ -248,8 +248,8 @@
stop := (case s of
Index: mlton/ssa/common-subexp.fun
===================================================================
---- mlton/ssa/common-subexp.fun (.../tags/on-20100608-release) (revision 7506)
-+++ mlton/ssa/common-subexp.fun (.../trunk) (revision 7506)
+--- mlton.orig/mlton/ssa/common-subexp.fun (.../tags/on-20100608-release) (revision 7506)
++++ mlton/mlton/ssa/common-subexp.fun (.../trunk) (revision 7506)
@@ -1,4 +1,4 @@
-(* Copyright (C) 2009 Matthew Fluet.
+(* Copyright (C) 2009,2011 Matthew Fluet.
@@ -479,8 +479,8 @@
functions = functions,
Index: mlton/backend/ssa-to-rssa.fun
===================================================================
---- mlton/backend/ssa-to-rssa.fun (.../tags/on-20100608-release) (revision 7506)
-+++ mlton/backend/ssa-to-rssa.fun (.../trunk) (revision 7506)
+--- mlton.orig/mlton/backend/ssa-to-rssa.fun (.../tags/on-20100608-release) (revision 7506)
++++ mlton/mlton/backend/ssa-to-rssa.fun (.../trunk) (revision 7506)
@@ -1,4 +1,4 @@
-(* Copyright (C) 2009 Matthew Fluet.
+(* Copyright (C) 2009,2011 Matthew Fluet.
@@ -500,8 +500,8 @@
(ty,
Index: mlton/elaborate/elaborate-core.fun
===================================================================
---- mlton/elaborate/elaborate-core.fun (.../tags/on-20100608-release) (revision 7506)
-+++ mlton/elaborate/elaborate-core.fun (.../trunk) (revision 7506)
+--- mlton.orig/mlton/elaborate/elaborate-core.fun (.../tags/on-20100608-release) (revision 7506)
++++ mlton/mlton/elaborate/elaborate-core.fun (.../trunk) (revision 7506)
@@ -2097,31 +2097,32 @@
pats = pats}
end))
@@ -555,8 +555,8 @@
end)
Index: mlton/codegen/amd64-codegen/amd64-generate-transfers.fun
===================================================================
---- mlton/codegen/amd64-codegen/amd64-generate-transfers.fun (.../tags/on-20100608-release) (revision 7506)
-+++ mlton/codegen/amd64-codegen/amd64-generate-transfers.fun (.../trunk) (revision 7506)
+--- mlton.orig/mlton/codegen/amd64-codegen/amd64-generate-transfers.fun (.../tags/on-20100608-release) (revision 7506)
++++ mlton/mlton/codegen/amd64-codegen/amd64-generate-transfers.fun (.../trunk) (revision 7506)
@@ -1357,6 +1357,31 @@
size = pointerSize})),
size_stack_args + 32)
@@ -591,8 +591,8 @@
AppendList.fromList
Index: doc/changelog
===================================================================
---- doc/changelog (.../tags/on-20100608-release) (revision 7506)
-+++ doc/changelog (.../trunk) (revision 7506)
+--- mlton.orig/doc/changelog (.../tags/on-20100608-release) (revision 7506)
++++ mlton/doc/changelog (.../trunk) (revision 7506)
@@ -1,3 +1,20 @@
+Here are the changes from version 2010608 to version YYYYMMDD.
+
@@ -616,8 +616,8 @@
Summary:
Index: lib/mlton/basic/real.sig
===================================================================
---- lib/mlton/basic/real.sig (.../tags/on-20100608-release) (revision 7506)
-+++ lib/mlton/basic/real.sig (.../trunk) (revision 7506)
+--- mlton.orig/lib/mlton/basic/real.sig (.../tags/on-20100608-release) (revision 7506)
++++ mlton/lib/mlton/basic/real.sig (.../trunk) (revision 7506)
@@ -1,4 +1,4 @@
-(* Copyright (C) 2009 Matthew Fluet.
+(* Copyright (C) 2009,2011 Matthew Fluet.
@@ -634,8 +634,8 @@
val log2: t -> t
Index: mlyacc/src/yacc.lex
===================================================================
---- mlyacc/src/yacc.lex (.../tags/on-20100608-release) (revision 7506)
-+++ mlyacc/src/yacc.lex (.../trunk) (revision 7506)
+--- mlton.orig/mlyacc/src/yacc.lex (.../tags/on-20100608-release) (revision 7506)
++++ mlton/mlyacc/src/yacc.lex (.../trunk) (revision 7506)
@@ -75,11 +75,11 @@
qualid ={id}".";
%%
@@ -653,9 +653,9 @@
<INITIAL>. => (Add yytext; continue());
Index: bin/mlton-script
===================================================================
---- bin/mlton-script (.../tags/on-20100608-release) (revision 7506)
-+++ bin/mlton-script (.../trunk) (revision 7506)
-@@ -131,6 +131,7 @@
+--- mlton.orig/bin/mlton-script (.../tags/on-20100608-release) (revision 7506)
++++ mlton/bin/mlton-script (.../trunk) (revision 7506)
+@@ -132,6 +132,7 @@
-target-link-opt freebsd '-L/usr/local/lib/' \
-target-link-opt aix '-maix64' \
-target-link-opt ia64 "$ia64hpux" \
Modified: mlton/trunk/package/debian/patches/series
===================================================================
--- mlton/trunk/package/debian/patches/series 2011-03-20 13:16:31 UTC (rev 7509)
+++ mlton/trunk/package/debian/patches/series 2011-03-20 13:46:36 UTC (rev 7510)
@@ -1 +1,2 @@
00-no-relocs-on-mips.patch
+11-fixes-20100608-to-20110319.patch
More information about the MLton-commit
mailing list