diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-02-10 10:21:04 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-02-10 10:21:04 +0000 |
| commit | bcabcc50f85300b3fbf720ece84c2fd14bd909ed (patch) | |
| tree | a9f7335df9d83c0b31e464510c8bbe3eab5bb0e7 /win32/perlhost.h | |
| parent | f7a782ffe2f8f23ef6d2e927311c879ee73b140f (diff) | |
| download | perl-bcabcc50f85300b3fbf720ece84c2fd14bd909ed.tar.gz | |
Eliminate use of Nullop in the core code. Dual life uses remain.
p4raw-id: //depot/perl@33269
Diffstat (limited to 'win32/perlhost.h')
| -rw-r--r-- | win32/perlhost.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/win32/perlhost.h b/win32/perlhost.h index b9d4e1e4ab..76e469657f 100644 --- a/win32/perlhost.h +++ b/win32/perlhost.h @@ -1782,7 +1782,7 @@ restart: if (PL_restartop) { POPSTACK_TO(PL_mainstack); PL_op = PL_restartop; - PL_restartop = Nullop; + PL_restartop = (OP*)NULL; goto restart; } PerlIO_printf(Perl_error_log, "panic: restartop\n"); @@ -1794,7 +1794,7 @@ restart: /* XXX hack to avoid perl_destruct() freeing optree */ win32_checkTLS(my_perl); - PL_main_root = Nullop; + PL_main_root = (OP*)NULL; } win32_checkTLS(my_perl); |