From 8a30fe684374af7dd25c8f9a2a97f5c01ea9d7bc Mon Sep 17 00:00:00 2001
From: Dohyun Kim <nomosnomos@gmail.com>
Date: Wed, 3 Jun 2015 20:26:58 +0900
Subject: check if token register exists using allocation number

---
 src/luaotfload.sty | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/luaotfload.sty')

diff --git a/src/luaotfload.sty b/src/luaotfload.sty
index f183f9a..34f9a87 100644
--- a/src/luaotfload.sty
+++ b/src/luaotfload.sty
@@ -50,6 +50,7 @@
 \ifcsname selectfont\endcsname
   \AtBeginDocument{\@ifpackageloaded{pgfsys}{
     \csname newtoks\endcsname\pgf@sys@pgf@resource@list@extgs@toks
+    \directlua{luaotfload.pgf_loaded=\the\allocationnumber}
     \def\pgf@sys@pgf@resource@list@extgs{\the\pgf@sys@pgf@resource@list@extgs@toks}
     \def\pgf@sys@addpdfresource@extgs@plain#1{\global\pgf@sys@pgf@resource@list@extgs@toks
       \expandafter{\the\pgf@sys@pgf@resource@list@extgs@toks #1}}
@@ -60,6 +61,7 @@
 \count255=\the\catcode`@\relax
 \catcode`@=11\relax
 \newtoks\pgf@sys@pgf@resource@list@extgs@toks
+\directlua{luaotfload.pgf_loaded=\the\allocationnumber}
 \def\pgf@sys@pgf@resource@list@extgs{\the\pgf@sys@pgf@resource@list@extgs@toks}
 \def\pgf@sys@addpdfresource@extgs@plain#1{\global\pgf@sys@pgf@resource@list@extgs@toks
   \expandafter{\the\pgf@sys@pgf@resource@list@extgs@toks #1}}
-- 
cgit v1.2.3

