/[VRac]/Z80/Z80.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 /Z80/Z80.pm

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

revision 112 by dpavlin, Fri Aug 3 15:03:14 2007 UTC revision 113 by dpavlin, Fri Aug 3 16:28:06 2007 UTC
# Line 29  our $debug = 0; Line 29  our $debug = 0;
29    
30  our @mem = (0xff) x 0x10000;    # 64M  our @mem = (0xff) x 0x10000;    # 64M
31    
 # program counter  
 our $PC = 0xbeef;  
32  # CPU registars  # CPU registars
33  our (  our (
34          $AF, $BC, $DE, $HL, $IX, $IY, $PC, $SP,          $AF, $BC, $DE, $HL, $IX, $IY, $PC, $SP,
# Line 169  called by C<Z80.xs> to push changes in r Line 167  called by C<Z80.xs> to push changes in r
167  sub _update_perl_R {  sub _update_perl_R {
168          warn "## Z80::update_perl_R(",dump(@_),")\n" if $debug;          warn "## Z80::update_perl_R(",dump(@_),")\n" if $debug;
169          (          (
170                  $AF $BC $DE $HL $IX $IY $PC $SP                  $AF, $BC, $DE, $HL, $IX, $IY, $PC, $SP,
171                  $AF1 $BC1 $DE1 $HL1;                  $AF1, $BC1, $DE1, $HL1,
172                  $IFF $I                  $IFF, $I,
173                  $R                  $R,
174                  $IPeriod $ICount $IRequest $IAutoReset $TrapBadOps $Trap $Trace                  $IPeriod, $ICount, $IRequest, $IAutoReset, $TrapBadOps, $Trap, $Trace
175          ) = @_;          ) = @_;
176    
177          dump_R();          dump_R();
Legend:
Removed from v.112  
changed lines
  Added in v.113
  ViewVC Help
Powered by ViewVC 1.1.26