Make -t BAREWORD extend the stack

It appears always to have been this way.  It was writing past the end
of the stack.

diff --git a/pp_sys.c b/pp_sys.c
index 9753763..14aa324 100644 (file)
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -3277,6 +3277,7 @@ PP(pp_fttty)
     tryAMAGICftest_MG('t');
 
     if (PL_op->op_flags & OPf_REF)
+       EXTEND(SP,1),
        gv = cGVOP_gv;
     else {
       SV *tmpsv = TOPs;