From d2daafe7b757bb586cb317f9c4bcb55ac2a7d169 Mon Sep 17 00:00:00 2001
From: "Richard W.M. Jones" <rjones@redhat.com>
Date: Thu, 28 Sep 2017 14:02:24 +0100
Subject: [PATCH] common/mlpcre: Add const-correctness to guestfs_int_pcre_sub.

---
 common/mlpcre/pcre-c.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/common/mlpcre/pcre-c.c b/common/mlpcre/pcre-c.c
index db0736d40..350da49bf 100644
--- a/common/mlpcre/pcre-c.c
+++ b/common/mlpcre/pcre-c.c
@@ -205,7 +205,7 @@ guestfs_int_pcre_sub (value nv)
   CAMLlocal1 (strv);
   int len;
   CLEANUP_FREE char *str = NULL;
-  struct last_match *m = gl_tls_get (last_match);
+  const struct last_match *m = gl_tls_get (last_match);
 
   if (m == NULL)
     raise_pcre_error ("PCRE.sub called without calling PCRE.matches", 0);