# HG changeset patch
# User Mike Pavone <pavone@retrodev.com>
# Date 1292904731 0
# Node ID d59611dcec7178372a39aa2c5fd30768fb178c16
# Parent  29b479a2ce487e79dc6c22cc0282f4572f8a86c2
Small fix to binary trees benchmark

diff -r 29b479a2ce48 -r d59611dcec71 binary_trees.rhope
--- 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
 			}{