shithub: mc

Download patch

ref: b120745ab31e2b6a061b97c20e40ff643e2c867b
parent: a277cea8fabeb3ec38484ffc461ae86e5fd8f9b5
author: Ori Bernstein <ori@eigenstate.org>
date: Wed Nov 9 17:13:08 EST 2016

Skip denormalized test on 9front.

	It's got a spurious failure.

--- a/lib/std/test/fltparse.myr
+++ b/lib/std/test/fltparse.myr
@@ -14,7 +14,18 @@
 		[.name="flt64-dblmax", .fn={ctx; is64(ctx, "1.7976931348623157e308", 1.7976931348623157e308)}],
 		[.name="flt64-toobig", .fn={ctx; is64(ctx, "17.976931348623157e308", std.flt64inf())}],
 		[.name="flt64-exptoobig", .fn={ctx; is64(ctx, "1.7976931348623157e309", std.flt64inf())}],
-		[.name="flt64-denorm", .fn={ctx; is64(ctx, "2.2250738585072014e-311", 2.2250738585072014e-311)}],
+
+		/*
+		skip the test for denormalized values on 9front; the APE float parser returns denormalized
+		values as 0, which means that we get a spurious failure.
+		*/
+		std.getsysinfo(&si)
+		match si.system
+		| "Plan9":
+		| _:
+			[.name="flt64-denorm", .fn={ctx; is64(ctx, "2.2250738585072014e-311", 2.2250738585072014e-311)}],
+		;;
+
 		/* 32 bit tests */
 		[.name="flt32-intzero", .fn={ctx; is32(ctx, "0", 0.0)}],
 		[.name="flt32-floatzero", .fn={ctx; is32(ctx, "0.0", 0.0)}],