diff options
-rw-r--r-- | os2/os2.c | 2 | ||||
-rw-r--r-- | pp_sys.c | 2 |
2 files changed, 2 insertions, 2 deletions
@@ -481,7 +481,7 @@ do_spawn_ve(pTHX_ SV *really, U32 flag, U32 execf, char *inicmd, U32 addflag) char **argsp = fargs; int nargs = 4; int force_shell; - int new_stderr = -1, nostderr = 0 + int new_stderr = -1, nostderr = 0; int fl_stderr = 0; STRLEN n_a; @@ -3485,10 +3485,10 @@ PP(pp_link) char *tmps = SvPV(TOPs, n_a); TAINT_PROPER("link"); SETi( PerlLIO_link(tmps, tmps2) >= 0 ); + RETURN; #else DIE(aTHX_ PL_no_func, "link"); #endif - RETURN; } PP(pp_symlink) |