split off -Ts from -Tj
there is actually no use case overlap between between the two (though limiting the step count does imply keeping the journal, as we exit before we could commit anyway).
This commit is contained in:
parent
13764a94b9
commit
58a69a5b63
|
@ -430,6 +430,8 @@ main( int argc, char **argv )
|
||||||
break;
|
break;
|
||||||
case 'j':
|
case 'j':
|
||||||
DFlags |= KEEPJOURNAL;
|
DFlags |= KEEPJOURNAL;
|
||||||
|
break;
|
||||||
|
case 's':
|
||||||
JLimit = strtol( ochar, &ochar, 10 );
|
JLimit = strtol( ochar, &ochar, 10 );
|
||||||
break;
|
break;
|
||||||
case 'z':
|
case 'z':
|
||||||
|
|
|
@ -834,7 +834,7 @@ sub test_impl($$$$)
|
||||||
for (my $l = 1; $l <= $njl; $l++) {
|
for (my $l = 1; $l <= $njl; $l++) {
|
||||||
mkchan($sx);
|
mkchan($sx);
|
||||||
|
|
||||||
my ($nxc, $nret) = runsync($async, "-Tj$l", "4-interrupt.log");
|
my ($nxc, $nret) = runsync($async, "-Ts$l", "4-interrupt.log");
|
||||||
if ($nxc != (100 + ($l & 1)) << 8) {
|
if ($nxc != (100 + ($l & 1)) << 8) {
|
||||||
print "Interrupting at step $l/$njl failed.\n";
|
print "Interrupting at step $l/$njl failed.\n";
|
||||||
print "Debug output:\n";
|
print "Debug output:\n";
|
||||||
|
|
Loading…
Reference in New Issue
Block a user