eval: add gt(), gte(), lt() and lte() fate tests

Janne Grunau committed 14 years ago

Commit 2d497c11 parent caac3ab2 files · +32 −0Browse files

Unified · Split

2 files

@@ -596,6 +596,14 @@ int main(int argc, char **argv) · 595 unmodified lines
596	596	"1Gi",
597	597	"st(0, 123)",
598	598	"st(1, 123); ld(1)",
	599	+ "lte(0, 1)",
	600	+ "lte(1, 1)",
	601	+ "lte(1, 0)",
	602	+ "lt(0, 1)",
	603	+ "lt(1, 1)",
	604	+ "gt(1, 0)",
	605	+ "gt(2, 7)",
	606	+ "gte(122, 122)",
599	607	/* compute 1+2+...+N */
600	608	"st(0, 1); while(lte(ld(0), 100), st(1, ld(1)+ld(0));st(0, ld(0)+1)); ld(1)",
601	609	/* compute Fib(N) */

@@ -94,6 +94,30 @@ Evaluating 'st(0, 123)' · 93 unmodified lines
94	94	Evaluating 'st(1, 123); ld(1)'
95	95	'st(1, 123); ld(1)' -> 123.000000
96	96
	97	+Evaluating 'lte(0, 1)'
	98	+'lte(0, 1)' -> 1.000000
	99	+
	100	+Evaluating 'lte(1, 1)'
	101	+'lte(1, 1)' -> 1.000000
	102	+
	103	+Evaluating 'lte(1, 0)'
	104	+'lte(1, 0)' -> 0.000000
	105	+
	106	+Evaluating 'lt(0, 1)'
	107	+'lt(0, 1)' -> 1.000000
	108	+
	109	+Evaluating 'lt(1, 1)'
	110	+'lt(1, 1)' -> 0.000000
	111	+
	112	+Evaluating 'gt(1, 0)'
	113	+'gt(1, 0)' -> 1.000000
	114	+
	115	+Evaluating 'gt(2, 7)'
	116	+'gt(2, 7)' -> 0.000000
	117	+
	118	+Evaluating 'gte(122, 122)'
	119	+'gte(122, 122)' -> 1.000000
	120	+
97	121	Evaluating 'st(0, 1); while(lte(ld(0), 100), st(1, ld(1)+ld(0));st(0, ld(0)+1)); ld(1)'
98	122	'st(0, 1); while(lte(ld(0), 100), st(1, ld(1)+ld(0));st(0, ld(0)+1)); ld(1)' -> 5050.000000
99	123

Keyboard shortcuts