/[webpac2]/trunk/t/2-input.t
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 /trunk/t/2-input.t

Parent Directory Parent Directory | Revision Log Revision Log | View Patch 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    
Legend:
Removed from v.771  
changed lines
  Added in v.774
  ViewVC Help
Powered by ViewVC 1.1.26