diff options
| -rw-r--r-- | win32/runperl.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/win32/runperl.c b/win32/runperl.c index 9f8c26af6f..ccb88061ed 100644 --- a/win32/runperl.c +++ b/win32/runperl.c @@ -938,6 +938,7 @@ public: win32_fprintf(stderr, "Error: Parse exception\n"); retVal = -1; } + *win32_errno() = 0; return retVal; }; inline int PerlRun(void) |