X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/dc0502853eaa4689351eeccc4becf89ec85060e0..2d63e3e140948d3d027cbbf76f121ae5d9c2fa6f:/perl.h?ds=sidebyside

diff --git a/perl.h b/perl.h
index 2bfe529..a2f5630 100644
--- a/perl.h
+++ b/perl.h
@@ -884,11 +884,6 @@ register struct op *op asm(stringify(OP_IN_REGISTER));
 
 #endif
 
-/* Digital UNIX defines a typedef CONTEXT when pthreads is in use */ 
-#if defined(__osf__)
-#  define CONTEXT PERL_CONTEXT
-#endif
-
 typedef MEM_SIZE STRLEN;
 
 typedef struct op OP;
@@ -917,7 +912,7 @@ typedef struct regexp REGEXP;
 typedef struct gp GP;
 typedef struct gv GV;
 typedef struct io IO;
-typedef struct context CONTEXT;
+typedef struct context PERL_CONTEXT;
 typedef struct block BLOCK;
 
 typedef struct magic MAGIC;
@@ -1949,7 +1944,7 @@ IEXT OP *	Ieval_start;
 IEXT COP * VOL	Icurcop IINIT(&compiling);
 IEXT COP *	Icurcopdb IINIT(NULL);
 IEXT line_t	Icopline IINIT(NOLINE);
-IEXT CONTEXT *	Icxstack;
+IEXT PERL_CONTEXT *	Icxstack;
 IEXT I32	Icxstack_ix IINIT(-1);
 IEXT I32	Icxstack_max IINIT(128);
 IEXT JMPENV 	Istart_env;	/* empty startup sigjmp() environment */