github.com/livingcomputermuseum.pdp7-unix
1
0
Fork 0
mirror of https://github.com/livingcomputermuseum/pdp7-unix.git synced 2026-02-04 23:55:22 +00:00
Code Issues Releases Wiki Activity

comment out debug prints

Browse Source
This commit is contained in:
Phil Budne
2016-02-25 21:03:39 -05:00
parent 2cca3d4473
commit 815d8bc220
1 changed files with 1 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
tools/as7
View File

@@ -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} )