Parent Directory | Revision Log
and here it segfaults again :-)
1 | #!/usr/bin/perl |
2 | |
3 | use warnings; |
4 | use strict; |
5 | |
6 | use blib; |
7 | use lib './lib'; |
8 | |
9 | use Test::More tests => 5; |
10 | use Test::Exception; |
11 | use Data::Dump qw/dump/; |
12 | |
13 | BEGIN { |
14 | use_ok( 'M6502' ); |
15 | } |
16 | |
17 | cmp_ok( $PC, '==', 0xbeef, 'PC' ); |
18 | |
19 | ok( M6502::reset(), 'reset' ); |
20 | |
21 | diag dump_R(); |
22 | |
23 | cmp_ok( $PC, '==', 0x4242, 'PC' ); |
24 | |
25 | |
26 | ok( M6502::reset(), 'reset again' ); |
Name | Value |
---|---|
svn:executable | * |
ViewVC Help | |
Powered by ViewVC 1.1.26 |