diff --git a/t/05-messages/02-errors.t b/t/05-messages/02-errors.t
index eeaa70e73db..6540a84bdfa 100644
--- a/t/05-messages/02-errors.t
+++ b/t/05-messages/02-errors.t
@@ -2,7 +2,7 @@ use lib ;
use Test;
use Test::Helpers;
-plan 4;
+plan 5;
# RT #132295
@@ -28,4 +28,9 @@ throws-like {
is-deeply class { has $.bar }.^methods».name.sort, ,
'auto-generated methods present in .^methods';
+# RT #124434
+is-run 「Failure.new(Exception.new); Nil」, :1exitcode,
+ :err{ .contains: "Died with Exception" },
+ 'Failure.new(Exception.new) does not segfault';
+
# vim: ft=perl6 expandtab sw=4