From a22d90bf0bcf52656bc495f133b8c53f46ef6223 Mon Sep 17 00:00:00 2001
From: "H.Merijn Brand - Tux" <h.m.brand@xs4all.nl>
Date: Fri, 25 Jan 2013 17:22:19 +0100
Subject: [PATCH] Update list of known symbols to 5.17.8

---
 Changelog |  1 +
 V.pm      | 18 ++++++++++++++++--
 2 files changed, 17 insertions(+), 2 deletions(-)

diff --git a/Changelog b/Changelog
index 817edbc..813a6ab 100644
--- a/Changelog
+++ b/Changelog
@@ -1,6 +1,7 @@
 0.16	- 25 Jan 2013, H.Merijn Brand
     * Do not shell out on 5.14.0 and up if perl provides internals (Nicholas)
     * Update copyright to 2013
+    * Update list of known symbols to 5.17.8
 
 0.15	- 07 Jun 2012, H.Merijn Brand
     * Update copyright to 2012
diff --git a/V.pm b/V.pm
index aebde80..d70ed81 100644
--- a/V.pm
+++ b/V.pm
@@ -22,8 +22,8 @@ $VERSION     = "0.16";
 
 # The list are as the perl binary has stored it in PL_bincompat_options
 #  search for it in
-#   perl.c line 1768 (first  block)
-#   perl.h line 4454 (second block),
+#   perl.c line 1661 S_Internals_V ()
+#   perl.h line 4664 (second block),
 my %BTD = map { $_ => 0 } qw(
 
     DEBUGGING
@@ -35,12 +35,17 @@ my %BTD = map { $_ => 0 } qw(
     PERL_MEM_LOG
     PERL_MEM_LOG_ENV
     PERL_MEM_LOG_ENV_FD
+    PERL_MEM_LOG_NOIMPL
     PERL_MEM_LOG_STDERR
     PERL_MEM_LOG_TIMESTAMP
+    PERL_PRESERVE_IVUV
+    PERL_RELOCATABLE_INCPUSH
     PERL_USE_DEVEL
     PERL_USE_SAFE_PUTENV
+    UNLINK_ALL_VERSIONS
     USE_ATTRIBUTES_FOR_PERLIO
     USE_FAST_STDIO
+    USE_LOCALE
     USE_PERL_ATOF
     USE_SITECUSTOMIZE
 
@@ -48,17 +53,23 @@ my %BTD = map { $_ => 0 } qw(
     DEBUG_LEAKING_SCALARS_FORK_DUMP
     DECCRTL_SOCKETS
     FAKE_THREADS
+    FCRYPT
+    HAS_TIMES
     MULTIPLICITY
     MYMALLOC
+    PERLIO_LAYERS
     PERL_DEBUG_READONLY_OPS
     PERL_GLOBAL_STRUCT
     PERL_IMPLICIT_CONTEXT
     PERL_IMPLICIT_SYS
     PERL_MAD
+    PERL_MICRO
     PERL_NEED_APPCTX
     PERL_NEED_TIMESBASE
     PERL_OLD_COPY_ON_WRITE
+    PERL_NEW_COPY_ON_WRITE
     PERL_POISON
+    PERL_SAWAMPERSAND
     PERL_TRACK_MEMPOOL
     PERL_USES_PL_PIDSTATUS
     PL_OP_SLAB_ALLOC
@@ -68,12 +79,15 @@ my %BTD = map { $_ => 0 } qw(
     USE_IEEE
     USE_ITHREADS
     USE_LARGE_FILES
+    USE_LOCALE_COLLATE
+    USE_LOCALE_NUMERIC
     USE_LONG_DOUBLE
     USE_PERLIO
     USE_REENTRANT_API
     USE_SFIO
     USE_SOCKS
     VMS_DO_SOCKETS
+    VMS_SHORTEN_LONG_SYMBOLS
     VMS_SYMBOL_CASE_AS_IS
     );
 
-- 
2.11.4.GIT