/[VRac]/M6502/perl.c
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 /M6502/perl.c

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

revision 38 by dpavlin, Mon Jul 30 23:28:25 2007 UTC revision 39 by dpavlin, Mon Jul 30 23:39:57 2007 UTC
# Line 46  void push_R(M6502 *R) { Line 46  void push_R(M6502 *R) {
46          XPUSHs( sv_2mortal( newSViv( R->S ) ) );          XPUSHs( sv_2mortal( newSViv( R->S ) ) );
47          XPUSHs( sv_2mortal( newSViv( R->PC.W ) ) );          XPUSHs( sv_2mortal( newSViv( R->PC.W ) ) );
48          PUTBACK;          PUTBACK;
49          call_pv("M6502::_push_R", G_DISCARD );          call_pv("M6502::push_R", G_DISCARD );
50          printf("push_R called\n");          printf("push_R called\n");
51          dump_R;          dump_R;
52          FREETMPS;          FREETMPS;
# Line 175  int main(int argc, char **argv) { Line 175  int main(int argc, char **argv) {
175                  printf("run CPU\n");                  printf("run CPU\n");
176                  dump_R;                  dump_R;
177                  //Run6502(R);                  //Run6502(R);
178                  Exec6502(R, 10);                  Exec6502(R, DEFAULT_RUN);
179                  dump_R;                  dump_R;
180                  push_R(R);                  push_R(R);
181                  printf("end of CPU run\n");                  printf("end of CPU run\n");
Legend:
Removed from v.38  
changed lines
  Added in v.39
  ViewVC Help
Powered by ViewVC 1.1.26