From 8032dd69bf673d8a4a75a1cba0b151104a5939df Mon Sep 17 00:00:00 2001 From: Hans Hagen Date: Sun, 19 Jan 2014 17:35:00 +0100 Subject: beta 2014.01.19 17:35 --- tex/context/base/context-version.pdf | Bin 4085 -> 4093 bytes tex/context/base/publ-dat.lua | 21 ++++++++++++++------- tex/context/base/status-files.pdf | Bin 24797 -> 24775 bytes tex/context/base/status-lua.pdf | Bin 229081 -> 229268 bytes 4 files changed, 14 insertions(+), 7 deletions(-) (limited to 'tex') diff --git a/tex/context/base/context-version.pdf b/tex/context/base/context-version.pdf index 12b8b4672..46c672325 100644 Binary files a/tex/context/base/context-version.pdf and b/tex/context/base/context-version.pdf differ diff --git a/tex/context/base/publ-dat.lua b/tex/context/base/publ-dat.lua index 049b97ad5..8b59b1dee 100644 --- a/tex/context/base/publ-dat.lua +++ b/tex/context/base/publ-dat.lua @@ -150,12 +150,17 @@ local filter_2 = Cs( -- in tugboat.bib this is not that efficient. However, eventually strings get -- hashed again. -local function do_shortcut(tag,key,value,shortcuts) +-- local function do_shortcut(tag,key,value,dataset) +-- publicationsstats.nofshortcuts = publicationsstats.nofshortcuts + 1 +-- tag = lowercase(tag) +-- if tag == "@string" then +-- dataset.shortcuts[key] = value +-- end +-- end + +local function do_shortcut(key,value,dataset) publicationsstats.nofshortcuts = publicationsstats.nofshortcuts + 1 - tag = lowercase(tag) - if tag == "@string" then - shortcuts[key] = value - end + dataset.shortcuts[key] = value end local function getindex(dataset,luadata,tag) @@ -247,14 +252,16 @@ local somevalue = s_value + d_value + b_value + r_value local value = Cs((somevalue * ((spacing * hash * spacing)/"" * somevalue)^0)) local assignment = spacing * keyword * spacing * equal * spacing * value * spacing -local shortcut = keyword * spacing * left * spacing * (assignment * comma^0)^0 * spacing * right * Carg(1) +----- shortcut = keyword * spacing * left * spacing * (assignment * comma^0)^0 * spacing * right * Carg(1) +local shortcut = P("@") * (P("string") + P("STRING")) * spacing * left * ((assignment * Carg(1))/do_shortcut * comma^0)^0 * spacing * right local definition = keyword * spacing * left * spacing * keyword * comma * Ct((assignment * comma^0)^0) * spacing * right * Carg(1) local comment = keyword * spacing * left * (1-right)^0 * spacing * right local forget = percent^1 * (1-lineending)^0 -- todo \% -local bibtotable = (space + forget + shortcut/do_shortcut + definition/do_definition + comment + 1)^0 +-- local bibtotable = (space + forget + shortcut/do_shortcut + definition/do_definition + comment + 1)^0 +local bibtotable = (space + forget + shortcut + definition/do_definition + comment + 1)^0 -- loadbibdata -> dataset.luadata -- loadtexdata -> dataset.luadata diff --git a/tex/context/base/status-files.pdf b/tex/context/base/status-files.pdf index 6d6b10a19..ea41e0226 100644 Binary files a/tex/context/base/status-files.pdf and b/tex/context/base/status-files.pdf differ diff --git a/tex/context/base/status-lua.pdf b/tex/context/base/status-lua.pdf index c54deb19a..f099c4741 100644 Binary files a/tex/context/base/status-lua.pdf and b/tex/context/base/status-lua.pdf differ -- cgit v1.2.3