Remove an ifdef for the Harris HCX-9 froms sv.c
authorBrian Fraser <fraserbn@gmail.com>
Fri, 30 Aug 2013 23:52:21 +0000 (20:52 -0300)
committerBrian Fraser <fraserbn@gmail.com>
Sat, 21 Sep 2013 11:47:40 +0000 (08:47 -0300)
Historical cruft.

sv.c

diff --git a/sv.c b/sv.c
index f32ac81..e6ba4c9 100644 (file)
--- a/sv.c
+++ b/sv.c
@@ -2987,10 +2987,6 @@ Perl_sv_2pv_flags(pTHX_ SV *const sv, STRLEN *const lp, const I32 flags)
            RESTORE_ERRNO;
            while (*s) s++;
        }
-#ifdef hcx
-       if (s[-1] == '.')
-           *--s = '\0';
-#endif
     }
     else if (isGV_with_GP(sv)) {
        GV *const gv = MUTABLE_GV(sv);