Parent Directory | Revision Log | Patch
revision 771 by dpavlin, Fri Nov 3 20:40:33 2006 UTC | revision 774 by dpavlin, Fri Nov 3 20:56:21 2006 UTC | |
---|---|---|
# | Line 77 sub test_fetch($$) { | Line 77 sub test_fetch($$) { |
77 | ok(my $rec = $input->fetch, "fetch $mfn"); | ok(my $rec = $input->fetch, "fetch $mfn"); |
78 | cmp_ok($input->pos, '==', $mfn, "pos $mfn"); | cmp_ok($input->pos, '==', $mfn, "pos $mfn"); |
79 | push @db, $rec; | push @db, $rec; |
80 | ok(my $dump = $input->dump, "dump $mfn"); | ok(my $dump = $input->dump_ascii, "dump_ascii $mfn"); |
81 | diag $dump if ($debug); | diag $dump if ($debug); |
82 | } | } |
83 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |