Index: t/op/pushaction.t
===================================================================
--- t/op/pushaction.t	(revision 37330)
+++ t/op/pushaction.t	(working copy)
@@ -97,7 +97,11 @@
 main
 OUTPUT
 
-pir_output_is( <<'CODE', <<'OUTPUT', "pushaction as closure" );
+$ENV{TEST_PROG_ARGS} ||= '';
+my @todo = $ENV{TEST_PROG_ARGS} =~ /--run-pbc/
+    ? ( todo => 'lexicals not thawed properly from PBC, RT #60652' )
+    : ();
+pir_output_is( <<'CODE', <<'OUTPUT', "pushaction as closure", @todo );
 .sub main :main
     .local pmc a
     .lex 'a', a
Index: t/pmc/sub.t
===================================================================
--- t/pmc/sub.t	(revision 37330)
+++ t/pmc/sub.t	(working copy)
@@ -1454,7 +1436,11 @@
 I can has outer?
 OUTPUT
 
-pir_output_is( <<'CODE', <<'OUTPUT', ':outer with identical sub names' );
+$ENV{TEST_PROG_ARGS} ||= '';
+my @todo = $ENV{TEST_PROG_ARGS} =~ /--run-pbc/
+    ? ( todo => 'lexicals not thawed properly from PBC, RT #60652' )
+    : ();
+pir_output_is( <<'CODE', <<'OUTPUT', ':outer with identical sub names', @todo );
 .sub 'main' :main
     $P0 = get_hll_global ['ABC'], 'outer'
     $P0('ABC lex')