changeset 155:d59611dcec71

Small fix to binary trees benchmark
author Mike Pavone <pavone@retrodev.com>
date Tue, 21 Dec 2010 04:12:11 +0000
parents 29b479a2ce48
children ed70399a07aa
files binary_trees.rhope
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/binary_trees.rhope	Tue Dec 21 04:11:47 2010 +0000
+++ b/binary_trees.rhope	Tue Dec 21 04:12:11 2010 +0000
@@ -61,7 +61,7 @@
 			]Append["\t check: "]
 			]Append[String[sum]]]
 		{
-			If[[current]=[max]]
+			If[[[current]+[2]]>[max]]
 			{
 				out <- 1
 			}{