/[VRac]/Orao.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /Orao.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 30 by dpavlin, Mon Jul 30 17:56:13 2007 UTC revision 31 by dpavlin, Mon Jul 30 18:07:29 2007 UTC
# Line 40  sub init { Line 40  sub init {
40          warn "call upstream init\n";          warn "call upstream init\n";
41          $self->SUPER::init( @_ );          $self->SUPER::init( @_ );
42    
43          warn "staring Orao $ORAO::VERSION emulation\n";          warn "staring Orao $Orao::VERSION emulation\n";
44    
45          $self->open_screen;          $self->open_screen;
46          $self->load_rom;          $self->load_rom;
# Line 80  sub load_oraoemu { Line 80  sub load_oraoemu {
80          my $self = shift;          my $self = shift;
81          my ( $path, $addr ) = @_;          my ( $path, $addr ) = @_;
82    
83          my $size = -s $path || die "no size for $path: $!";          my $size = -s $path || confess "no size for $path: $!";
84    
85          my $buff = read_file( $path );          my $buff = read_file( $path );
86    

Legend:
Removed from v.30  
changed lines
  Added in v.31

  ViewVC Help
Powered by ViewVC 1.1.26