From 815d8bc220d900e093b34a5449bc3262dcecf107 Mon Sep 17 00:00:00 2001
From: Phil Budne <phil@ultimate.com>
Date: Thu, 25 Feb 2016 21:03:39 -0500
Subject: [PATCH] comment out debug prints

---
 tools/as7 | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/tools/as7 b/tools/as7
index 8cc7226..433cfd2 100755
--- a/tools/as7
+++ b/tools/as7
@@ -125,7 +125,7 @@ sub parse_file {
             # Split into a section with possible labels and a
             # statement section with definitely no labels. The ?
             # makes the first pattern less greedy.
-            print("cmd is >$cmd<\n");
+            #print("cmd is >$cmd<\n");
             $cmd =~ m{(.*?)([^:]*$)};
             my $labelsect = $1;
             my $statement = $2;
@@ -216,7 +216,6 @@ sub parse_statement {
 sub parse_expression {
     my $expression = shift;
 
-print "exp: $expression\n";
     # If it's a defined variable ( . , .. , etc.)
     # return the value
     return ( $Var{$expression} )