First class regexps.

p4raw-id: //depot/perl@32751

1 files changed, 1 insertions, 1 deletions

diff --git a/regcomp.c b/regcomp.c
index 5a175ba807..90b94a3dd8 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -5209,7 +5209,7 @@ SV*
 Perl_reg_qr_package(pTHX_ REGEXP * const rx)
 {
 	PERL_UNUSED_ARG(rx);
-	return newSVpvs("Regexp");
+	return NULL;
 }
 
 /* Scans the name of a named buffer from the pattern.