changeset 32:934d03d42a7e

Debug junk removed
author Michael Pavone <pavone@retrodev.com>
date Sat, 26 Jul 2014 01:02:41 -0700
parents 3812bf35168d
children c68c03a0e072 968705fcb4c6
files code/dotScanner.lm
diffstat 1 files changed, 0 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- a/code/dotScanner.lm	Sat Jul 26 00:58:50 2014 -0700
+++ b/code/dotScanner.lm	Sat Jul 26 01:02:41 2014 -0700
@@ -207,32 +207,25 @@
 				notdone <- 0
 			} else: {
 				continuations <- fold: continuations [] with: :acc el{
-					print: #[20 acc]
 					ret <- acc
 					if: notdone {
 						ret <- el:
-						print: #[11 ret]
 						if: (ret isInteger?) {
 							ret <- acc
 						} else: {
 							if: (ret value) {
-								print: 12
 								notdone <- 0
 								ret <- (ret tail)
 							} else: {
-								print: 13
 								ret <- (ret tail) | acc
 							}
 						}
 					} else: {}
-					print: #[21 ret]
 					ret
 				}
-				print: #[15 continuations]
 				if: notdone {
 					continuations <- flatten: continuations
 				} else: {}
-				print: #[16 continuations]
 			}
 		}
 		continuations
@@ -282,7 +275,6 @@
 				}
 			} else: {
 			}
-			print: #[10 myLoc ret]
 			ret
 		}
 	}
@@ -295,9 +287,7 @@
 		visited <- treeMap: grid :row {
 			treeMap: row :el { 0 }
 		}
-		print: #[5 myLoc]
 		path <- advancer: [(makeContClos: grid myLoc [])]
-		print: path
 		#[0 (path value)]
 	}