Remove vestigial ORANGE references

This was a temporary type used while regexes were in the process
of being promoted to first-class SVs

2 files changed, 1 insertions, 2 deletions

diff --git a/dump.c b/dump.c
index a8de39358b..463946ac6f 100644
--- a/dump.c
+++ b/dump.c
@@ -2705,7 +2705,7 @@ Perl_sv_xmlpeek(pTHX_ SV *sv)
 	sv_catpv(t, " BIND=\"");
 	break;
     case SVt_REGEXP:
-	sv_catpv(t, " ORANGE=\"");
+	sv_catpv(t, " REGEXP=\"");
 	break;
     case SVt_PVFM:
 	sv_catpv(t, " FM=\"");
diff --git a/perl.h b/perl.h
index d3fee5d223..c7139cde39 100644
--- a/perl.h
+++ b/perl.h
@@ -2425,7 +2425,6 @@ typedef struct STRUCT_SV SV;
 typedef struct av AV;
 typedef struct hv HV;
 typedef struct cv CV;
-typedef struct regexp ORANGE;	/* This is the body structure.  */
 typedef struct p5rx REGEXP;
 typedef struct gp GP;
 typedef struct gv GV;