in reply to Suspending after catching TSTP

Could you please show a Short, Self-Contained, Correct Example that reproduces the issue?

Update: I haven't been able to get this to coredump yet:

use warnings; use strict; my $run=1; $SIG{INT} = sub { print "INT\n"; $run=0 }; $SIG{TSTP} = sub { print "TSTP\n"; kill 'STOP', $$ }; sleep 1 while $run;