--- M6502/M6502.pm 2007/07/30 17:32:41 29 +++ M6502/M6502.pm 2007/07/30 17:56:13 30 @@ -92,9 +92,10 @@ my $self = shift; my ($from,$to) = @_; if ($from + $to) { - #printf "ram %04x - %04x\n", $from, $to; + printf "ram %04x - %04x\n", $from, $to; return $mem[$from .. $to - 1]; } + printf "ram %04x\n", $from; return $mem[$from] if defined($from); confess "no from address"; }