diff options
| author | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-03-01 15:15:08 +0100 |
|---|---|---|
| committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-03-01 15:15:08 +0100 |
| commit | 2a958dcf22dd71ba1e4408648676d44c16d7e3bf (patch) | |
| tree | 8a118b195ac47f9e926bb5083f3d0f91c352d281 /tex/context/base/mkiv/strc-ref.lua | |
| parent | 48c3ce21b30a886099e9afc2edf683e8a47ba29e (diff) | |
| download | context-2a958dcf22dd71ba1e4408648676d44c16d7e3bf.tar.gz | |
2016-03-01 14:06:00
Diffstat (limited to 'tex/context/base/mkiv/strc-ref.lua')
| -rw-r--r-- | tex/context/base/mkiv/strc-ref.lua | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/tex/context/base/mkiv/strc-ref.lua b/tex/context/base/mkiv/strc-ref.lua index a937a345b..b42727bce 100644 --- a/tex/context/base/mkiv/strc-ref.lua +++ b/tex/context/base/mkiv/strc-ref.lua @@ -2059,12 +2059,25 @@ function references.getinternallistreference(n) -- n points into list (todo: reg return i and destinationattributes[i] or 0 end +function references.getinternalcachedlistreference(n) -- n points into list (todo: registers) + local l = lists.cached[n] + local i = l and l.references.internal + return i and destinationattributes[i] or 0 +end + implement { name = "getinternallistreference", actions = { references.getinternallistreference, context }, arguments = "integer" } +implement { + name = "getinternalcachedlistreference", + actions = { references.getinternalcachedlistreference, context }, + arguments = "integer" +} + + -- function references.getcurrentmetadata(tag) |