[patch@25854]vms.c rmsexpand and memmove fixes

[p5sagit/p5-mst-13.2.git] / win32 / perlhost.h

diff --git a/win32/perlhost.h b/win32/perlhost.h
index fcc3e0a..dd63c76 100644 (file)
--- a/win32/perlhost.h
+++ b/win32/perlhost.h
@@ -1750,7 +1750,7 @@ restart:
            PL_curstash = PL_defstash;
            if (PL_endav && !PL_minus_c)
                call_list(oldscope, PL_endav);
-           status = STATUS_NATIVE_EXPORT;
+           status = STATUS_EXIT;
            break;
        case 3:
            if (PL_restartop) {