Index: t/compilers/pge/p5regex/p5rx.t
===================================================================
--- t/compilers/pge/p5regex/p5rx.t	(revision 18289)
+++ t/compilers/pge/p5regex/p5rx.t	(working copy)
@@ -1,4 +1,4 @@
-#!./parrot -G
+#!./parrot
 # Copyright (C) 2001-2006, The Perl Foundation.
 # $Id$
 
@@ -55,6 +55,15 @@
 .const int TESTS = 960
 
 .sub main :main
+    push_eh not_developing
+    $P0 = new .OS
+    $P0.'stat'('DEVELOPING')
+    goto start
+not_developing:
+    sweepoff
+    collectoff
+start:
+
     load_bytecode 'Test/Builder.pir'
     load_bytecode 'PGE.pbc'
     load_bytecode 'PGE/Dumper.pbc'
Index: t/compilers/pge/p6regex/01-regex.t
===================================================================
--- t/compilers/pge/p6regex/01-regex.t	(revision 18289)
+++ t/compilers/pge/p6regex/01-regex.t	(working copy)
@@ -1,4 +1,4 @@
-#!./parrot -G
+#!./parrot
 # Copyright (C) 2001-2007, The Perl Foundation.
 # $Id$
 
@@ -55,6 +55,15 @@
 .const string TESTS = 'no_plan'
 
 .sub main :main
+    push_eh not_developing
+    $P0 = new .OS
+    $P0.'stat'('DEVELOPING')
+    goto start
+not_developing:
+    sweepoff
+    collectoff
+start:
+
     load_bytecode 'Test/Builder.pir'
     load_bytecode 'PGE.pbc'
     load_bytecode 'PGE/Dumper.pbc'
Index: t/compilers/pge/perl6regex/01-regex.t
===================================================================
--- t/compilers/pge/perl6regex/01-regex.t	(revision 18289)
+++ t/compilers/pge/perl6regex/01-regex.t	(working copy)
@@ -1,4 +1,4 @@
-#!./parrot -G
+#!./parrot
 # Copyright (C) 2001-2007, The Perl Foundation.
 # $Id$
 
@@ -55,6 +55,15 @@
 .const string TESTS = 'no_plan'
 
 .sub main :main
+    push_eh not_developing
+    $P0 = new .OS
+    $P0.'stat'('DEVELOPING')
+    goto start
+not_developing:
+    sweepoff
+    collectoff
+start:
+
     load_bytecode 'Test/Builder.pir'
     load_bytecode 'PGE.pbc'
     load_bytecode 'PGE/Dumper.pbc'