diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 1998-07-18 20:56:58 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 1998-07-18 20:56:58 +0000 |
| commit | b28d0864af067162e2d26cc66b6b8acb6d3cddc8 (patch) | |
| tree | 1d4129f7ceb5b0a2c9dd4532337b5ea32432988c /win32/perllib.c | |
| parent | 62a559b8665e0cfb74dd6a69c48e22412fbdf175 (diff) | |
| download | perl-b28d0864af067162e2d26cc66b6b8acb6d3cddc8.tar.gz | |
PL_ scheme Builds under Minw32 - some SEGFAULT snags
p4raw-id: //depot/ansiperl@1537
Diffstat (limited to 'win32/perllib.c')
| -rw-r--r-- | win32/perllib.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/win32/perllib.c b/win32/perllib.c index ab613bd9c9..d1d942c495 100644 --- a/win32/perllib.c +++ b/win32/perllib.c @@ -32,7 +32,7 @@ RunPerl(int argc, char **argv, char **env, void *iosubsystem) if (!(my_perl = perl_alloc())) return (1); perl_construct( my_perl ); - perl_destruct_level = 0; + PL_perl_destruct_level = 0; exitstatus = perl_parse( my_perl, xs_init, argc, argv, env); if (!exitstatus) { |