summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1997-11-14 22:04:58 +0000
committerGurusamy Sarathy <gsar@cpan.org>1997-11-14 22:04:58 +0000
commit2d63e3e140948d3d027cbbf76f121ae5d9c2fa6f (patch)
tree21068467e062aa49fa127017a1d135666bb91b4c /perl.c
parentdc0502853eaa4689351eeccc4becf89ec85060e0 (diff)
parent3d57aefb538705242f5ab4c3d9d854139b302aba (diff)
downloadperl-2d63e3e140948d3d027cbbf76f121ae5d9c2fa6f.tar.gz
Integrate mainline changes into win32 branch. Now would be a good time
to reverse integrate the win32 branch into mainline. p4raw-id: //depot/win32/perl@253
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/perl.c b/perl.c
index 40b781cfe9..c2f7ffca4e 100644
--- a/perl.c
+++ b/perl.c
@@ -1226,7 +1226,7 @@ perl_call_sv(SV *sv, I32 flags)
markstack_ptr--;
/* we're trying to emulate pp_entertry() here */
{
- register CONTEXT *cx;
+ register PERL_CONTEXT *cx;
I32 gimme = GIMME_V;
ENTER;
@@ -1294,7 +1294,7 @@ perl_call_sv(SV *sv, I32 flags)
SV **newsp;
PMOP *newpm;
I32 gimme;
- register CONTEXT *cx;
+ register PERL_CONTEXT *cx;
I32 optype;
POPBLOCK(cx,newpm);
@@ -2449,8 +2449,8 @@ init_stacks(ARGSproto)
stack_sp = stack_base;
stack_max = stack_base + 127;
- cxstack_max = 8192 / sizeof(CONTEXT) - 2; /* Use most of 8K. */
- New(50,cxstack,cxstack_max + 1,CONTEXT);
+ cxstack_max = 8192 / sizeof(PERL_CONTEXT) - 2; /* Use most of 8K. */
+ New(50,cxstack,cxstack_max + 1,PERL_CONTEXT);
cxstack_ix = -1;
New(50,tmps_stack,128,SV*);
@@ -2991,7 +2991,7 @@ static void
my_exit_jump(void)
{
dTHR;
- register CONTEXT *cx;
+ register PERL_CONTEXT *cx;
I32 gimme;
SV **newsp;