# HG changeset patch
# User William Morgan <bill@mrgn.org>
# Date 1376254819 25200
# Node ID 42930b0904b168c5d9346a4b235ee302fca5db87
# Parent  0f8adc187d29a345874929cd224d7fe0ed3b2828
clean out test

diff -r 0f8adc187d29 -r 42930b0904b1 src/bv.tp
--- a/src/bv.tp	Sun Aug 11 13:48:35 2013 -0700
+++ b/src/bv.tp	Sun Aug 11 14:00:19 2013 -0700
@@ -569,18 +569,7 @@
 			}
 		}
 
-		main <- {
-			prog <- program
-			trees2 <- prog allWithMaxSize: 4
-			foreach: trees2 :idx tree {
-				prog root!: tree
-				test: prog
-			}
-			//print: trees2
-			0
-		}
- 
-		mmain <- :args {
+		main <- :args {
 			//test: (program gentestprog)
 			//test: (program exampleprog)
 			size <- 3