diff options
author | David Mitchell <davem@iabyn.com> | 2022-05-28 12:29:47 +0100 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2022-06-20 11:27:22 +0100 |
commit | 9d1ea90bdc34326fa7d7fa0f0149c2bc09791d88 (patch) | |
tree | a4c8943f96518c8ff29794938d680e321a6487fb /t/op | |
parent | a8c38aeb02f54027c283d5d8948af4947f669700 (diff) | |
download | perl-9d1ea90bdc34326fa7d7fa0f0149c2bc09791d88.tar.gz |
t/op/catch.t: add comments explaining its purpose
This test file didn't have any comments explaining what it was for:
especially confusing as there's no 'catch' op.
Diffstat (limited to 't/op')
-rw-r--r-- | t/op/catch.t | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/t/op/catch.t b/t/op/catch.t index 2ed6a16d9b..92f3970772 100644 --- a/t/op/catch.t +++ b/t/op/catch.t @@ -1,5 +1,11 @@ #!perl +# Test that exception catching is set up early enough when executing +# pp_entereval() etc. There used to be a gap where an exception could +# be raised before perl was ready to catch it. +# +# RT #105930: eval 'UNITCHECK{die}' crashes inside FETCH + BEGIN { chdir 't' if -d 't'; require './test.pl'; |