From 9dc80f7706b0b167f5d294a69d1d200a88c63c93 Mon Sep 17 00:00:00 2001
From: krangelov <kr.angelov@gmail.com>
Date: Thu, 18 Nov 2021 14:11:35 +0100
Subject: [PATCH] fix the crash in the python testsuite

---
 src/runtime/c/pgf/pgf.cxx | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/src/runtime/c/pgf/pgf.cxx b/src/runtime/c/pgf/pgf.cxx
index 34d02c4e9..b21631556 100644
--- a/src/runtime/c/pgf/pgf.cxx
+++ b/src/runtime/c/pgf/pgf.cxx
@@ -1736,7 +1736,8 @@ void pgf_set_global_flag(PgfDB *db, PgfRevision revision,
         ref<PgfFlag> flag = PgfDB::malloc<PgfFlag>(name->size+1);
         flag->ref_count = 1;
         memcpy(&flag->name, name, sizeof(PgfText)+name->size+1);
-        flag->value = m->match_lit(&u, value);
+        PgfLiteral lit = m->match_lit(&u, value);
+        flag->value = lit;
         Namespace<PgfFlag> gflags =
             namespace_insert(pgf->gflags, flag);
         namespace_release(pgf->gflags);
@@ -1782,7 +1783,8 @@ void pgf_set_abstract_flag(PgfDB *db, PgfRevision revision,
         ref<PgfFlag> flag = PgfDB::malloc<PgfFlag>(name->size+1);
         flag->ref_count = 1;
         memcpy(&flag->name, name, sizeof(PgfText)+name->size+1);
-        flag->value = m->match_lit(&u, value);
+        PgfLiteral lit = m->match_lit(&u, value);
+        flag->value = lit;
         Namespace<PgfFlag> aflags =
             namespace_insert(pgf->abstract.aflags, flag);
         namespace_release(pgf->abstract.aflags);
@@ -1828,7 +1830,8 @@ void pgf_set_concrete_flag(PgfDB *db, PgfConcrRevision revision,
         ref<PgfFlag> flag = PgfDB::malloc<PgfFlag>(name->size+1);
         flag->ref_count = 1;
         memcpy(&flag->name, name, sizeof(PgfText)+name->size+1);
-        flag->value = m->match_lit(&u, value);
+        PgfLiteral lit = m->match_lit(&u, value);
+        flag->value = lit;
         Namespace<PgfFlag> cflags =
             namespace_insert(concr->cflags, flag);
         namespace_release(concr->cflags);