From d3c3ed72bc22ad89c3f754a4e556970f6e70d063 Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 9 May 2014 11:05:30 -0400
Subject: [PATCH] Do not invert a NULL cp_list.

Fix for Coverity perl5 CID 28966.
---
 regcomp.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/regcomp.c b/regcomp.c
index 920f7cb..d5b7679 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -14635,7 +14635,8 @@ parseit:
      * at compile time.  Besides not inverting folded locale now, we can't
      * invert if there are things such as \w, which aren't known until runtime
      * */
-    if (invert
+    if (cp_list
+        && invert
         && ! (ANYOF_FLAGS(ret) & (ANYOF_LOCALE_FLAGS))
 	&& ! depends_list
 	&& ! HAS_NONLOCALE_RUNTIME_PROPERTY_DEFINITION)
-- 
1.9.2