1 files changed, 2 insertions, 0 deletions
diff --git a/toke.c b/toke.c
index d9ba6cbc78..2527e95eda 100644
--- a/toke.c
+++ b/toke.c
@@ -2704,7 +2704,9 @@ Perl_yylex(pTHX)
 		    else
 			newargv = PL_origargv;
 		    newargv[0] = ipath;
+		    PERL_FPU_PRE_EXEC
 		    PerlProc_execv(ipath, EXEC_ARGV_CAST(newargv));
+		    PERL_FPU_POST_EXEC
 		    Perl_croak(aTHX_ "Can't exec %s", ipath);
 		}
 #endif