diff options
Diffstat (limited to 'tex')
34 files changed, 697 insertions, 230 deletions
diff --git a/tex/context/base/mkii/cont-new.mkii b/tex/context/base/mkii/cont-new.mkii index 874be285f..46a281768 100644 --- a/tex/context/base/mkii/cont-new.mkii +++ b/tex/context/base/mkii/cont-new.mkii @@ -11,7 +11,7 @@ %C therefore copyrighted by \PRAGMA. See mreadme.pdf for %C details. -\newcontextversion{2020.08.06 18:55} +\newcontextversion{2020.08.07 23:34} %D This file is loaded at runtime, thereby providing an %D excellent place for hacks, patches, extensions and new diff --git a/tex/context/base/mkii/context.mkii b/tex/context/base/mkii/context.mkii index eb1875985..448523d8d 100644 --- a/tex/context/base/mkii/context.mkii +++ b/tex/context/base/mkii/context.mkii @@ -20,7 +20,7 @@ %D your styles an modules. \edef\contextformat {\jobname} -\edef\contextversion{2020.08.06 18:55} +\edef\contextversion{2020.08.07 23:34} %D For those who want to use this: diff --git a/tex/context/base/mkii/mult-fr.mkii b/tex/context/base/mkii/mult-fr.mkii index f25f03455..160731fd1 100644 --- a/tex/context/base/mkii/mult-fr.mkii +++ b/tex/context/base/mkii/mult-fr.mkii @@ -954,6 +954,7 @@ \setinterfaceconstant{limittext}{textelimite} \setinterfaceconstant{line}{ligne} \setinterfaceconstant{linecorrection}{correctionligne} +\setinterfaceconstant{linedirection}{linedirection} \setinterfaceconstant{lines}{lignes} \setinterfaceconstant{list}{liste} \setinterfaceconstant{listtext}{texteliste} diff --git a/tex/context/base/mkiv/cont-new.mkiv b/tex/context/base/mkiv/cont-new.mkiv index 81c514628..6049160c8 100644 --- a/tex/context/base/mkiv/cont-new.mkiv +++ b/tex/context/base/mkiv/cont-new.mkiv @@ -13,7 +13,7 @@ % \normalend % uncomment this to get the real base runtime -\newcontextversion{2020.08.06 18:55} +\newcontextversion{2020.08.07 23:34} %D This file is loaded at runtime, thereby providing an excellent place for hacks, %D patches, extensions and new features. There can be local overloads in cont-loc diff --git a/tex/context/base/mkiv/context.mkiv b/tex/context/base/mkiv/context.mkiv index 2ff801015..7ced40420 100644 --- a/tex/context/base/mkiv/context.mkiv +++ b/tex/context/base/mkiv/context.mkiv @@ -45,7 +45,7 @@ %D {YYYY.MM.DD HH:MM} format. \edef\contextformat {\jobname} -\edef\contextversion{2020.08.06 18:55} +\edef\contextversion{2020.08.07 23:34} %D Kind of special: diff --git a/tex/context/base/mkiv/context.mkxl b/tex/context/base/mkiv/context.mkxl index a29b15c14..313bf87ae 100644 --- a/tex/context/base/mkiv/context.mkxl +++ b/tex/context/base/mkiv/context.mkxl @@ -29,7 +29,7 @@ %D {YYYY.MM.DD HH:MM} format. \edef\contextformat {\jobname} -\edef\contextversion{2020.08.06 18:55} +\edef\contextversion{2020.08.07 23:34} %D Kind of special: diff --git a/tex/context/base/mkiv/mult-low.lua b/tex/context/base/mkiv/mult-low.lua index d7f781663..f96199655 100644 --- a/tex/context/base/mkiv/mult-low.lua +++ b/tex/context/base/mkiv/mult-low.lua @@ -68,13 +68,14 @@ return { "primeasciicode", "hyphenasciicode", -- "frozenhsizecode", "frozenleftskipcode", "frozenrightskipcode", "frozenhangindentcode", - "frozenhangaftercode", "frozenparindentcode", "frozenparfillskipcode", "frozenadjustspacingcode", - "frozenprotrudecharscode", "frozenpretolerancecode", "frozentolerancecode", "frozenemergencystretchcode", - "frozenloosenesscode", "frozenlastlinefitcode", "frozenlinepenaltycode", "frozeninterlinepenaltycode", - "frozenwidowpenaltycode", "frozenclubpenaltycode", "frozenbrokenpenaltycode", "frozenadjdemeritscode", + "frozenhangaftercode", "frozenparindentcode", "frozenparfillskipcode", "frozenparfillleftskipcode", + "frozenadjustspacingcode", "frozenprotrudecharscode", "frozenpretolerancecode", "frozentolerancecode", + "frozenemergencystretchcode", "frozenloosenesscode", "frozenlastlinefitcode", "frozenlinepenaltycode", + "frozeninterlinepenaltycode", "frozenclubpenaltycode", "frozenwidowpenaltycode", + "frozendisplaywidowpenaltycode", "frozenbrokenpenaltycode", "frozenadjdemeritscode", "frozendoublehyphendemeritscode", "frozenfinalhyphendemeritscode", "frozenparshapecode", - "frozeninterlinepenaltiescode", "frozenwidowpenaltiescode", "frozenclubpenaltiescode", - "paragraphupdatecodes", "paragraphpenaltycodes", "paragraphdemeritcodes", "paragraphshapecodes", + "frozeninterlinepenaltiescode", "frozenclubpenaltiescode", "frozenwidowpenaltiescode", + "frozendisplaywidowpenaltiescode", -- "activemathcharcode", -- @@ -502,8 +503,11 @@ return { -- "openout", "closeout", "write", "openin", "closein", "read", "readline", "readfromterminal", -- - "boxlines", "boxline", "setboxline", "copyboxline", "boxlineht", "boxlinedp", - "boxlinewd", "boxlinels", "boxliners", "boxlinelh", "boxlinerh", + "boxlines", "boxline", "setboxline", "copyboxline", + "boxlinewd","boxlineht", "boxlinedp", + "boxlinenw","boxlinenh", "boxlinend", + "boxlinels", "boxliners", "boxlinelh", "boxlinerh", "boxlinelp", "boxlinerp", "boxlinein", + "boxrangewd", "boxrangeht", "boxrangedp", } } diff --git a/tex/context/base/mkiv/mult-prm.lua b/tex/context/base/mkiv/mult-prm.lua index 834cd29a1..c56b121c0 100644 --- a/tex/context/base/mkiv/mult-prm.lua +++ b/tex/context/base/mkiv/mult-prm.lua @@ -382,6 +382,7 @@ return { "nospaces", "novrule", "orelse", + "orunless", "outputbox", "parattr", "pardirection", diff --git a/tex/context/base/mkiv/spac-par.mkxl b/tex/context/base/mkiv/spac-par.mkxl index 60b35db13..73b1b267d 100644 --- a/tex/context/base/mkiv/spac-par.mkxl +++ b/tex/context/base/mkiv/spac-par.mkxl @@ -21,32 +21,35 @@ % this might move to syst-ini.mkxl -\setnewconstant\frozenhsizecode "0000001 -\setnewconstant\frozenleftskipcode "0000002 -\setnewconstant\frozenrightskipcode "0000004 -\setnewconstant\frozenhangindentcode "0000008 -\setnewconstant\frozenhangaftercode "0000010 -\setnewconstant\frozenparindentcode "0000020 -\setnewconstant\frozenparfillskipcode "0000040 -\setnewconstant\frozenadjustspacingcode "0000080 -\setnewconstant\frozenprotrudecharscode "0000100 -\setnewconstant\frozenpretolerancecode "0000200 -\setnewconstant\frozentolerancecode "0000400 -\setnewconstant\frozenemergencystretchcode "0000800 -\setnewconstant\frozenloosenesscode "0001000 -\setnewconstant\frozenlastlinefitcode "0002000 -\setnewconstant\frozenlinepenaltycode "0004000 -\setnewconstant\frozeninterlinepenaltycode "0008000 -\setnewconstant\frozenwidowpenaltycode "0010000 -\setnewconstant\frozenclubpenaltycode "0020000 -\setnewconstant\frozenbrokenpenaltycode "0040000 -\setnewconstant\frozenadjdemeritscode "0080000 -\setnewconstant\frozendoublehyphendemeritscode "0100000 -\setnewconstant\frozenfinalhyphendemeritscode "0200000 -\setnewconstant\frozenparshapecode "0400000 -\setnewconstant\frozeninterlinepenaltiescode "0800000 -\setnewconstant\frozenwidowpenaltiescode "1000000 -\setnewconstant\frozenclubpenaltiescode "2000000 +\setnewconstant\frozenhsizecode "00000001 +\setnewconstant\frozenleftskipcode "00000002 +\setnewconstant\frozenrightskipcode "00000004 +\setnewconstant\frozenhangindentcode "00000008 +\setnewconstant\frozenhangaftercode "00000010 +\setnewconstant\frozenparindentcode "00000020 +\setnewconstant\frozenparfillskipcode "00000040 +\setnewconstant\frozenparfillleftskipcode "00000080 +\setnewconstant\frozenadjustspacingcode "00000100 +\setnewconstant\frozenprotrudecharscode "00000200 +\setnewconstant\frozenpretolerancecode "00000400 +\setnewconstant\frozentolerancecode "00000800 +\setnewconstant\frozenemergencystretchcode "00001000 +\setnewconstant\frozenloosenesscode "00002000 +\setnewconstant\frozenlastlinefitcode "00004000 +\setnewconstant\frozenlinepenaltycode "00008000 +\setnewconstant\frozeninterlinepenaltycode "00010000 +\setnewconstant\frozenclubpenaltycode "00020000 +\setnewconstant\frozenwidowpenaltycode "00040000 +\setnewconstant\frozendisplaywidowpenaltycode "00080000 +\setnewconstant\frozenbrokenpenaltycode "00100000 +\setnewconstant\frozenadjdemeritscode "00200000 +\setnewconstant\frozendoublehyphendemeritscode "00400000 +\setnewconstant\frozenfinalhyphendemeritscode "00800000 +\setnewconstant\frozenparshapecode "01000000 +\setnewconstant\frozeninterlinepenaltiescode "02000000 +\setnewconstant\frozenclubpenaltiescode "04000000 +\setnewconstant\frozenwidowpenaltiescode "08000000 +\setnewconstant\frozendisplaywidowpenaltiescode "10000000 \setnewconstant\paragraphupdatecodes\numexpr \frozentolerancecode diff --git a/tex/context/base/mkiv/status-files.pdf b/tex/context/base/mkiv/status-files.pdf Binary files differindex ec3637371..469411908 100644 --- a/tex/context/base/mkiv/status-files.pdf +++ b/tex/context/base/mkiv/status-files.pdf diff --git a/tex/context/base/mkiv/status-lua.pdf b/tex/context/base/mkiv/status-lua.pdf Binary files differindex 3c1db9234..66ab0b9cf 100644 --- a/tex/context/base/mkiv/status-lua.pdf +++ b/tex/context/base/mkiv/status-lua.pdf diff --git a/tex/context/base/mkiv/supp-box.lmt b/tex/context/base/mkiv/supp-box.lmt index cee5cf1ad..95af07d9f 100644 --- a/tex/context/base/mkiv/supp-box.lmt +++ b/tex/context/base/mkiv/supp-box.lmt @@ -943,38 +943,62 @@ implement { do - local scaninteger = tokens.scanners.integer - local scanbox = tokens.scanners.box - local scandimen = tokens.scanners.dimen + local scaninteger = tokens.scanners.integer + local scanbox = tokens.scanners.box + local scandimen = tokens.scanners.dimen - local setsubtype = nuts.setsubtype - local removenode = nuts.remove - local getnormalizedline = nuts.getnormalizedline -- we can optimize this + local setsubtype = nuts.setsubtype + local removenode = nuts.remove + local getnormalizedline = nuts.getnormalizedline -- we can optimize this + local getdimensions = nuts.dimensions + local getrangedimensions = nuts.rangedimensions - local line_code = nodes.listcodes.line - local unknown_code = nodes.listcodes.unknown + local setprop = nuts.setprop + local getprop = nuts.getprop - local values = tokens.values - local dimension_value = values.dimension - local cardinal_value = values.cardinal - local list_value = values.list + local line_code = nodes.listcodes.line + local unknown_code = nodes.listcodes.unknown - local function boxlinecount(what) - local box = scaninteger() - local list = getbox(box) - local line = 0 - if list then - list = getlist(list) + local values = tokens.values + local dimension_value = values.dimension + local cardinal_value = values.cardinal + local list_value = values.list + + -- todo: make helper that formats + + local function reporterror(fmt,...) + tex.error(string.formatters[fmt](...)) + end + + -- The first variant did a linear lookup but for large boxes and lots of + -- analysis that is not nice. Okay, in practice performance is quite ok + -- (milliseconds for thousands of access) but still ... the next is nicer + -- and it's part of the experimental fun stuff anyway. + + local function countlines(box) + local prop = getprop(box,"boxlines") + if not prop then + local line = 0 + local list = getlist(box) + prop = { } if list then for n, subtype in nexthlist, list do if subtype == line_code then line = line + 1 + prop[line] = n end end end + setprop(box,"boxlines",prop) end + return prop + end + + local function boxlinecount(what) + local n = scaninteger() + local box = getbox(n) if what == "value" then - return cardinal_value, line + return cardinal_value, box and #countlines(box) or 0 end end @@ -983,32 +1007,62 @@ do local line = scaninteger() local box = getbox(n) if box then - local list = getlist(box) - if list then - for n, subtype in nexthlist, list do - if subtype == line_code then - if line == 1 then - return n, list, box - else - line = line - 1 - end + local prop = getprop(box,"boxlines") + if not prop then + prop = countlines(box) + end + local found = prop[line] + if found then + local props = getprop(found,"lineproperties") + if not props then + props = getnormalizedline(found) + props.width, props.height, props.depth = getwhd(found) + setprop(found,"lineproperties",props) + end + return props, line, found, box + end + end + reporterror("no line %i in box %i",line,n) + end + + local function findrange() + local n = scaninteger() + local first = scaninteger() + local last = scaninteger() + local box = getbox(n) + if box then + local prop = getprop(box,"boxlines") + if not prop then + prop = countlines(box) + end + if first > 0 and last <= #prop then + for i = first, last do + local found = prop[i] + local props = getprop(found,"lineproperties") + if not props then + props = getnormalizedline(found) + props.width, props.height, props.depth = getwhd(found) + setprop(found,"lineproperties",props) end end + return prop, first, last, box end end + reporterror("no lines %i - %i in box %i",first,last,n) end - local function getline(found,list,box,value) + local function getline(props,line,found,box,value) local p, n = getboth(found) local temp = new_hlist() setsubtype(temp,line_code) setwhd(temp,getwhd(found)) - if found == list then + if found == getlist(box) then setlink(temp,n) setlist(box,temp) else setlink(p,temp,n) end + getprop(box,"boxlines")[line] = temp setboth(found) setsubtype(found, unknown_code) found = tonode(found) @@ -1019,9 +1073,8 @@ do end end - local function copyline(found,list,box,value) - local p, n = getboth(found) - found = copy_list(found) + local function copyline(props,line,found,box,value) + found = copy_node(found) setsubtype(found, unknown_code) found = tonode(found) if value then @@ -1031,118 +1084,153 @@ do end end - local function setline(found,list,box) + local function setline(props,line,found,box) local p, n = getboth(found) local temp = scanbox() if temp then temp = tonut(temp) - if found == list then + if found == getlist(box) then setlink(temp,n) setlist(box,temp) else setlink(p,temp,n) end flush_node(found) + getprop(box,"boxlines")[line] = temp + end + end + + local function naturaldimensions(p,l,found) + if not p.naturalwidth then + p.naturalwidth, p.naturalheight, p.naturaldepth = getdimensions(getlist(found)) end + return p + end + + local function rangedimensions(p,f,l,box) + local w, h, d = getrangedimensions(box,p[f],getnext(p[l]),true) + return { width = w, height = h, depth = d } end - local getters = { - ["wd"] = function(found) return dimension_value, getwidth (found) end, - ["ht"] = function(found) return dimension_value, getheight(found) end, - ["dp"] = function(found) return dimension_value, getdepth (found) end, - ["ls"] = function(found) return dimension_value, getnormalizedline(found).leftskip end, - ["rs"] = function(found) return dimension_value, getnormalizedline(found).rightskip end, - ["lh"] = function(found) return dimension_value, getnormalizedline(found).lefthangskip end, - ["rh"] = function(found) return dimension_value, getnormalizedline(found).righthangskip end, - ["lp"] = function(found) return dimension_value, getnormalizedline(found).parfillleftskip end, - ["rp"] = function(found) return dimension_value, getnormalizedline(found).parfillrightskip end, - ["in"] = function(found) return dimension_value, getnormalizedline(found).indent end, - ["get"] = function(found,list,box) return getline(found,list,box,true) end, + + local getters_one = { + + ["wd"] = function(p,l,found) return dimension_value, p.width end, + ["ht"] = function(p,l,found) return dimension_value, p.height end, + ["dp"] = function(p,l,found) return dimension_value, p.depth end, + ["ls"] = function(p,l,found) return dimension_value, p.leftskip end, + ["rs"] = function(p,l,found) return dimension_value, p.rightskip end, + ["lh"] = function(p,l,found) return dimension_value, p.lefthangskip end, + ["rh"] = function(p,l,found) return dimension_value, p.righthangskip end, + ["lp"] = function(p,l,found) return dimension_value, p.parfillleftskip end, + ["rp"] = function(p,l,found) return dimension_value, p.parfillrightskip end, + ["in"] = function(p,l,found) return dimension_value, p.indent end, + + ["nw"] = function(p,l,found) return dimension_value, naturaldimensions(p,l,found).naturalwidth end, + ["nh"] = function(p,l,found) return dimension_value, naturaldimensions(p,l,found).naturalheigth end, + ["nd"] = function(p,l,found) return dimension_value, naturaldimensions(p,l,found).naturaldepth end, + + ["get"] = function(p,l,found,box) return getline(p,l,found,box,true) end, } - local setters = { - ["wd"] = function(found) return setwidth (found,scandimen(false,false,true)) end, - ["ht"] = function(found) return setheight(found,scandimen(false,false,true)) end, - ["dp"] = function(found) return setdepth (found,scandimen(false,false,true)) end, + local getters_two = { + ["wd"] = function(p,f,l,box) return dimension_value, rangedimensions(p,f,l,box).width end, + ["ht"] = function(p,f,l,box) return dimension_value, rangedimensions(p,f,l,box).height end, + ["dp"] = function(p,f,l,box) return dimension_value, rangedimensions(p,f,l,box).depth end, + } + + local setters_one = { + ["wd"] = function(p,l,found) return setwidth (found,scandimen(false,false,true)) end, + ["ht"] = function(p,l,found) return setheight(found,scandimen(false,false,true)) end, + ["dp"] = function(p,l,found) return setdepth (found,scandimen(false,false,true)) end, ["set"] = setline, ["get"] = getline, ["copy"] = copyline, } - local report = logs.reporter("tex", "boxlines") - local function boxline(name,what) - local found, list, box = findline() + local props, line, found, box = findline() if not found then - report("invalid box line specification, pass box number and line number") + -- elseif what == "value" then - local getter = getters[name] + local getter = getters_one[name] if getter then - return getter(found,list,box) + return getter(props,line,found,box) end else - local setter = setters[name] + local setter = setters_one[name] if setter then - return setter(found,list,box) + return setter(props,line,found,box) end end end + -- + + local function boxrange(name,what) + local prop, first, last, box = findrange() + if not prop then + -- + elseif what == "value" then + local getter = getters_two[name] + if getter then + return getter(prop,first,last,box) + end + else + local setter = setters_two[name] + if setter then + return setter(prop,first,last,box) + end + end + end + + local function define_one(name,action) + implement { + name = name, + public = true, + protected = true, + value = true, + actions = function(what) return boxline(action,what) end, + } + end + + local function define_two(name,action) + implement { + name = name, + public = true, + protected = true, + value = true, + actions = function(what) return boxrange(action,what) end, + } + end + implement { - name = "boxlines", public = true, protected = true, value = true, - actions = boxlinecount, - } - implement { - name = "boxline", public = true, protected = true, value = true, - actions = function(what) return boxline("get",what) end, - } - implement { - name = "setboxline", public = true, protected = true, value = true, - actions = function(what) return boxline("set",what) end, - } - implement { - name = "copyboxline", public = true, protected = true, value = true, - actions = function(what) return boxline("copy",what) end, - } - implement { - name = "boxlineht", public = true, protected = true, value = true, - actions = function(what) return boxline("ht",what) end, - } - implement { - name = "boxlinedp", public = true, protected = true, value = true, - actions = function(what) return boxline("dp",what) end, - } - implement { - name = "boxlinewd", public = true, protected = true, value = true, - actions = function(what) return boxline("wd",what) end, - } - implement { - name = "boxlinels", public = true, protected = true, value = true, - actions = function(what) return boxline("ls",what) end, - } - implement { - name = "boxliners", public = true, protected = true, value = true, - actions = function(what) return boxline("rs",what) end, - } - implement { - name = "boxlinelh", public = true, protected = true, value = true, - actions = function(what) return boxline("lh",what) end, - } - implement { - name = "boxlinerh", public = true, protected = true, value = true, - actions = function(what) return boxline("rh",what) end, - } - implement { - name = "boxlinelp", public = true, protected = true, value = true, - actions = function(what) return boxline("lp",what) end, - } - implement { - name = "boxlinerp", public = true, protected = true, value = true, - actions = function(what) return boxline("rp",what) end, - } - implement { - name = "boxlinein", public = true, protected = true, value = true, - actions = function(what) return boxline("in",what) end, + name = "boxlines", + public = true, + protected = true, + value = true, + actions = boxlinecount, } + define_one("boxline", "get") + define_one("setboxline", "set") + define_one("copyboxline", "copy") + define_one("boxlineht", "ht") + define_one("boxlinedp", "dp") + define_one("boxlinewd", "wd") + define_one("boxlinels", "ls") + define_one("boxliners", "rs") + define_one("boxlinelh", "lh") + define_one("boxlinerh", "rh") + define_one("boxlinelp", "lp") + define_one("boxlinerp", "rp") + define_one("boxlinein", "in") + define_one("boxlinenw", "nw") + define_one("boxlinenh", "nh") + define_one("boxlinend", "nd") + + define_two("boxrangewd", "wd") + define_two("boxrangeht", "ht") + define_two("boxrangedp", "dp") + end diff --git a/tex/context/base/mkiv/supp-box.mkxl b/tex/context/base/mkiv/supp-box.mkxl index 90bc82667..c5afa1f8f 100644 --- a/tex/context/base/mkiv/supp-box.mkxl +++ b/tex/context/base/mkiv/supp-box.mkxl @@ -2802,8 +2802,22 @@ %D \boxlinelp <box> <line> %D \boxlinerp <box> <line> %D \boxlinein <box> <line> +%D \boxrangeht <box> <first line> <last line> +%D \boxrangedp <box> <first line> <last line> +%D \boxrangewd <box> <first line> <last line> %D \stoptyping +% To be discussed with ws. +% +% \installcorenamespace{namedboxes} +% +% \protected\def\newnamedbox#1% +% {\ifcsname\??namedboxes#1\endcsname\else +% \expandafter\newbox\csname\??namedboxes#1\endcsname +% \fi} +% +% \protected\def\namedbox#1{\csname\??namedboxes#1\endcsname} + \protect \endinput % a bit of test code: diff --git a/tex/context/interface/mkii/keys-fr.xml b/tex/context/interface/mkii/keys-fr.xml index 7a5af096f..0696e6c7c 100644 --- a/tex/context/interface/mkii/keys-fr.xml +++ b/tex/context/interface/mkii/keys-fr.xml @@ -960,6 +960,7 @@ <cd:constant name='limittext' value='textelimite'/> <cd:constant name='line' value='ligne'/> <cd:constant name='linecorrection' value='correctionligne'/> + <cd:constant name='linedirection' value='linedirection'/> <cd:constant name='lines' value='lignes'/> <cd:constant name='list' value='liste'/> <cd:constant name='listtext' value='texteliste'/> diff --git a/tex/context/sample/third/aesop-de.tex b/tex/context/sample/third/aesop-de.tex index 80a41f295..ec7d21ee2 100644 --- a/tex/context/sample/third/aesop-de.tex +++ b/tex/context/sample/third/aesop-de.tex @@ -1,5 +1,3 @@ -% German example file from Aesop - Der L\"owe und die M\"ucke Eine M\"ucke forderte mit den \"uberm\"utigsten Worten @@ -14,7 +12,7 @@ kratzt. Du sollst aber empfinden, da\SS\ ich st\"arker bin als du!} Mit diesen Worten flog sie in eines seiner Nasenl\"ocher und stach ihn so sehr, da\SS\ er sich vor Schmerz selbst zerfleischte und sich f\"ur \"uberwunden -erkl\"arte. +erkl\"arte. Stolz auf diesen Sieg flog die M\"ucke davon, um ihn aller Welt auszuposaunen, \"ubersah aber das Gewebe einer Spinne @@ -22,4 +20,4 @@ und verfing sich in demselben. Gierig umarmte die Spinne sie und sog ihr das Heldenblut aus. Sterbend empfand die M\"ucke ihre Nichtigkeit, indem sie, die Besiegerin des L\"owen, einem so ver\"achtlichen Tiere, einer Spinne, -erliegen mu\SS te. +erliegen mu\SS te. diff --git a/tex/context/sample/third/herbert-en.tex b/tex/context/sample/third/herbert-en.tex new file mode 100644 index 000000000..6a75dde28 --- /dev/null +++ b/tex/context/sample/third/herbert-en.tex @@ -0,0 +1,23 @@ +\startlanguage[en] +\startlines +Sweet day, so cool, so calm, so bright, +The bridal of the earth and sky; +The dew shall weep thy fall to-night, +For thou must die. + +Sweet rose, whose hue angry and brave +Bids the rash gazer wipe his eye; +Thy root is ever in its grave, +And thou must die. + +Sweet spring, full of sweet days and roses, +A box where sweets compacted lie; +My music shows ye have your closes, +And all must die. + +Only a sweet and virtuous soul, +Like season'd timber, never gives; +But though the whole world turn to coal, +Then chiefly lives. +\stoplines +\stoplanguage
\ No newline at end of file diff --git a/tex/context/sample/third/herbert-es.tex b/tex/context/sample/third/herbert-es.tex new file mode 100644 index 000000000..f3cf751d4 --- /dev/null +++ b/tex/context/sample/third/herbert-es.tex @@ -0,0 +1,23 @@ +\startlanguage[es] +\startlines +Dulces nupcias del cielo con la tierra, +Oh puro dia añil, +Llorará tu crepúsculo el rocío, +Pues tendrás que morir. + +Oh rosa fulgurante que deslumbras +Con tu vivo matiz, +Tu raíz yace siempre en tu sepulcro, +Donde habrás de morir. + +Oh tú de rosas y horas dulces llena, +Primavera gentil, +Mis cadencias demuestran que agonizas; +Pronto habrás de morir. + +Tan sólo el alma dulce y virtuosa +Madera es en sazón, +Pues si el mundo quedara hecho cenizas +Viviría mejor. +\stoplines +\stoplanguage diff --git a/tex/context/sample/third/jaros-sk.tex b/tex/context/sample/third/jaros-sk.tex index bd2952501..85dc0f482 100644 --- a/tex/context/sample/third/jaros-sk.tex +++ b/tex/context/sample/third/jaros-sk.tex @@ -1,5 +1,5 @@ -Ja viem prečo si ty tak zrazu ochorel, na spoveď sa ti nechce! Či chce alebo -nie, to je teraz vedľajšie. Sama vidíš, že kľačať nemôžem \dots -- Hanbu ti -do kostola robiť nepôjdem, ešte by som niekoho postojačky urazil \dots -- A -s kým pôjdem na spoveď, vari sama? -- Keď nemáš s kým ísť, zober si psa. Aj -jemu sa možno treba vyspovedať. Nebreše, beťár, ako treba \dots +Ja viem prečo si ty tak zrazu ochorel, na spoveď sa ti nechce! Či chce alebo nie, +to je teraz vedľajšie. Sama vidíš, že kľačať nemôžem \dots -- Hanbu ti do kostola +robiť nepôjdem, ešte by som niekoho postojačky urazil \dots -- A s kým pôjdem na +spoveď, vari sama? -- Keď nemáš s kým ísť, zober si psa. Aj jemu sa možno treba +vyspovedať. Nebreše, beťár, ako treba \dots diff --git a/tex/context/sample/third/jaros-vlnka-sk.tex b/tex/context/sample/third/jaros-vlnka-sk.tex index ea564c3de..92b6549ef 100644 --- a/tex/context/sample/third/jaros-vlnka-sk.tex +++ b/tex/context/sample/third/jaros-vlnka-sk.tex @@ -1,5 +1,5 @@ -Ja viem prečo si ty tak zrazu ochorel, na spoveď sa ti nechce! Či chce alebo -nie, to je teraz vedľajšie. Sama vidíš, že kľačať nemôžem \dots -- Hanbu ti -do kostola robiť nepôjdem, ešte by som niekoho postojačky urazil \dots -- -A~s~kým pôjdem na spoveď, vari sama? -- Keď nemáš s~kým ísť, zober si psa. Aj -jemu sa možno treba vyspovedať. Nebreše, beťár, ako treba \dots +Ja viem prečo si ty tak zrazu ochorel, na spoveď sa ti nechce! Či chce alebo nie, +to je teraz vedľajšie. Sama vidíš, že kľačať nemôžem \dots -- Hanbu ti do kostola +robiť nepôjdem, ešte by som niekoho postojačky urazil \dots -- A~s~kým pôjdem na +spoveď, vari sama? -- Keď nemáš s~kým ísť, zober si psa. Aj jemu sa možno treba +vyspovedať. Nebreše, beťár, ako treba \dots diff --git a/tex/context/sample/third/khatt-en.tex b/tex/context/sample/third/khatt-en.tex index 52891af25..26023b09a 100644 --- a/tex/context/sample/third/khatt-en.tex +++ b/tex/context/sample/third/khatt-en.tex @@ -1,4 +1,4 @@ -ʿAlī ibn Abī Ṭālib said to his scribe ʿUbaydullāh ibn Abī Rāfiʿ: Set -down your inkwell before you, sharpen the edge of your pen, make sure -there is open space between the lines, and set your letter|-|spacing -closely. Now {\em that} is the way to make the script shine! +ʿAlī ibn Abī Ṭālib said to his scribe ʿUbaydullāh ibn Abī Rāfiʿ: Set down your +inkwell before you, sharpen the edge of your pen, make sure there is open space +between the lines, and set your letter|-|spacing closely. Now {\em that} is the +way to make the script shine! diff --git a/tex/context/sample/third/komensky-cz.tex b/tex/context/sample/third/komensky-cz.tex index 96bfa609f..cbc76e0c9 100644 --- a/tex/context/sample/third/komensky-cz.tex +++ b/tex/context/sample/third/komensky-cz.tex @@ -1,33 +1,31 @@ Nejkrásnějším dílem Božím je svět, všeliké neviditelné Božské věcí viditelné -ukazující. Nejkrásnější je ale naše duše, jíž je dáno, myšlením zobrazovat -ve svém nitru svět i věci veškery. Nejkrásnější je řeč, jejíž pomocí -vmalováváme všeliké obrazy své duše v duši druhého. Nejkrásnější je písmo, -jímž zachycujeme a natrvalo upevňujeme řeč, samu o sobě prchavou a -pomíjející, a jímž jako bychom ji zadržovali, aby trvala. Nejkrásnější jsou -knihy, písmem ladně sestavené, jimiž zpodobenou moudrost posíláme lidem, -místně či časově vzdáleným, ba dokonce i pozdnímu potomstvu. Nejkrásnějším -darem Božím je vynález tiskových liter, jimž se knihy nesmírně rychle -rozmnožují. +ukazující. Nejkrásnější je ale naše duše, jíž je dáno, myšlením zobrazovat ve +svém nitru svět i věci veškery. Nejkrásnější je řeč, jejíž pomocí vmalováváme +všeliké obrazy své duše v duši druhého. Nejkrásnější je písmo, jímž zachycujeme a +natrvalo upevňujeme řeč, samu o sobě prchavou a pomíjející, a jímž jako bychom ji +zadržovali, aby trvala. Nejkrásnější jsou knihy, písmem ladně sestavené, jimiž +zpodobenou moudrost posíláme lidem, místně či časově vzdáleným, ba dokonce i +pozdnímu potomstvu. Nejkrásnějším darem Božím je vynález tiskových liter, jimž se +knihy nesmírně rychle rozmnožují. Sazeč, maje před sebou kasu, naplněnou kovovými literkami, uloženými v -přihrádkách, dívá se do rukopisu, postaveného na vidlici tak, aby pohodlně -viděl, v levé ruce sázítko, pravou rukou vybírá (z přihrádek) literky a -skládá je do sázítka v slova: když naplní sloupec, přenáší je na desku. -Jakmile pak je naplněn počet sloupců pro jednu stranu archu, rozdělí je -příložkami, ováže je a stáhne železnými rámy, aby se nerozpadly; a tím se -podle svého mínění své povinnosti zhostil. +přihrádkách, dívá se do rukopisu, postaveného na vidlici tak, aby pohodlně viděl, +v levé ruce sázítko, pravou rukou vybírá (z přihrádek) literky a skládá je do +sázítka v slova: když naplní sloupec, přenáší je na desku. Jakmile pak je naplněn +počet sloupců pro jednu stranu archu, rozdělí je příložkami, ováže je a stáhne +železnými rámy, aby se nerozpadly; a tím se podle svého mínění své povinnosti +zhostil. -A tak tito všichni pracujíce vzájemně vykonávající jakoby hračkou -podivuhodné dílo, lidem kdysi nepochopitelné, jen když mají všichni to, čeho -je přitom potření, jednak odborné znalosti zbystřené praxí, jednak vytrvalou -pozornost a píli. Znalosti: poněvadž třebaže je tiskařství řemeslem, je -nejsubtilnějším uměním, skládajícím se z přečetných maličkostí, na něž nutno -dávat dobrý pozor. Pozornost a píli: poněvadž zde, kde se stýká tolik -maličkostí, velmi snadno se něco přihodí, co by dílo rušilo, kdyby se -nebdělo. +A tak tito všichni pracujíce vzájemně vykonávající jakoby hračkou podivuhodné +dílo, lidem kdysi nepochopitelné, jen když mají všichni to, čeho je přitom +potření, jednak odborné znalosti zbystřené praxí, jednak vytrvalou pozornost a +píli. Znalosti: poněvadž třebaže je tiskařství řemeslem, je nejsubtilnějším +uměním, skládajícím se z přečetných maličkostí, na něž nutno dávat dobrý pozor. +Pozornost a píli: poněvadž zde, kde se stýká tolik maličkostí, velmi snadno se +něco přihodí, co by dílo rušilo, kdyby se nebdělo. -Tolik ve všeobecnosti o tom, jak se tisknou knihy vůbec. Jestliže by se -naskytla otázka, jak vznikají knihy dobré, bude třeba říci, že je žádoucí za -prvé rozumně sepsaný rukopis, hodný světla a nikoli tmy; na druhém místě -elegantní typy; na třetím čistý papír; na čtvrtém pak pozorná práce, aby vše -až do poslední čárky bylo zřetelné, rozlišené a správné. +Tolik ve všeobecnosti o tom, jak se tisknou knihy vůbec. Jestliže by se naskytla +otázka, jak vznikají knihy dobré, bude třeba říci, že je žádoucí za prvé rozumně +sepsaný rukopis, hodný světla a nikoli tmy; na druhém místě elegantní typy; na +třetím čistý papír; na čtvrtém pak pozorná práce, aby vše až do poslední čárky +bylo zřetelné, rozlišené a správné. diff --git a/tex/context/sample/third/komensky-vlnka-cz.tex b/tex/context/sample/third/komensky-vlnka-cz.tex index f9998f903..6e45b0056 100644 --- a/tex/context/sample/third/komensky-vlnka-cz.tex +++ b/tex/context/sample/third/komensky-vlnka-cz.tex @@ -1,33 +1,31 @@ Nejkrásnějším dílem Božím je svět, všeliké neviditelné Božské věcí viditelné -ukazující. Nejkrásnější je ale naše duše, jíž je dáno, myšlením zobrazovat -ve svém nitru svět i~věci veškery. Nejkrásnější je řeč, jejíž pomocí -vmalováváme všeliké obrazy své duše v~duši druhého. Nejkrásnější je písmo, -jímž zachycujeme a~natrvalo upevňujeme řeč, samu o~sobě prchavou -a~pomíjející, a~jímž jako bychom ji zadržovali, aby trvala. Nejkrásnější jsou -knihy, písmem ladně sestavené, jimiž zpodobenou moudrost posíláme lidem, -místně či časově vzdáleným, ba dokonce i~pozdnímu potomstvu. Nejkrásnějším -darem Božím je vynález tiskových liter, jimž se knihy nesmírně rychle -rozmnožují. +ukazující. Nejkrásnější je ale naše duše, jíž je dáno, myšlením zobrazovat ve +svém nitru svět i~věci veškery. Nejkrásnější je řeč, jejíž pomocí vmalováváme +všeliké obrazy své duše v~duši druhého. Nejkrásnější je písmo, jímž zachycujeme +a~natrvalo upevňujeme řeč, samu o~sobě prchavou a~pomíjející, a~jímž jako bychom +ji zadržovali, aby trvala. Nejkrásnější jsou knihy, písmem ladně sestavené, jimiž +zpodobenou moudrost posíláme lidem, místně či časově vzdáleným, ba dokonce +i~pozdnímu potomstvu. Nejkrásnějším darem Božím je vynález tiskových liter, jimž +se knihy nesmírně rychle rozmnožují. Sazeč, maje před sebou kasu, naplněnou kovovými literkami, uloženými v~přihrádkách, dívá se do rukopisu, postaveného na vidlici tak, aby pohodlně -viděl, v~levé ruce sázítko, pravou rukou vybírá (z~přihrádek) literky -a~skládá je do sázítka v~slova: když naplní sloupec, přenáší je na desku. -Jakmile pak je naplněn počet sloupců pro jednu stranu archu, rozdělí je -příložkami, ováže je a~stáhne železnými rámy, aby se nerozpadly; a~tím se -podle svého mínění své povinnosti zhostil. +viděl, v~levé ruce sázítko, pravou rukou vybírá (z~přihrádek) literky a~skládá je +do sázítka v~slova: když naplní sloupec, přenáší je na desku. Jakmile pak je +naplněn počet sloupců pro jednu stranu archu, rozdělí je příložkami, ováže je +a~stáhne železnými rámy, aby se nerozpadly; a~tím se podle svého mínění své +povinnosti zhostil. -A~tak tito všichni pracujíce vzájemně vykonávající jakoby hračkou -podivuhodné dílo, lidem kdysi nepochopitelné, jen když mají všichni to, čeho -je přitom potřebí, jednak odborné znalosti zbystřené praxí, jednak vytrvalou -pozornost a~píli. Znalosti: poněvadž třebaže je tiskařství řemeslem, je -nejsubtilnějším uměním, skládajícím se z~přečetných maličkostí, na něž nutno -dávat dobrý pozor. Pozornost a~píli: poněvadž zde, kde se stýká tolik -maličkostí, velmi snadno se něco přihodí, co by dílo rušilo, kdyby se -nebdělo. +A~tak tito všichni pracujíce vzájemně vykonávající jakoby hračkou podivuhodné +dílo, lidem kdysi nepochopitelné, jen když mají všichni to, čeho je přitom +potřebí, jednak odborné znalosti zbystřené praxí, jednak vytrvalou pozornost +a~píli. Znalosti: poněvadž třebaže je tiskařství řemeslem, je nejsubtilnějším +uměním, skládajícím se z~přečetných maličkostí, na něž nutno dávat dobrý pozor. +Pozornost a~píli: poněvadž zde, kde se stýká tolik maličkostí, velmi snadno se +něco přihodí, co by dílo rušilo, kdyby se nebdělo. -Tolik ve všeobecnosti o~tom, jak se tisknou knihy vůbec. Jestliže by se -naskytla otázka, jak vznikají knihy dobré, bude třeba říci, že je žádoucí za -prvé rozumně sepsaný rukopis, hodný světla a~nikoli tmy; na druhém místě -elegantní typy; na třetím čistý papír; na čtvrtém pak pozorná práce, aby vše -až do poslední čárky bylo zřetelné, rozlišené a~správné. +Tolik ve všeobecnosti o~tom, jak se tisknou knihy vůbec. Jestliže by se naskytla +otázka, jak vznikají knihy dobré, bude třeba říci, že je žádoucí za prvé rozumně +sepsaný rukopis, hodný světla a~nikoli tmy; na druhém místě elegantní typy; na +třetím čistý papír; na čtvrtém pak pozorná práce, aby vše až do poslední čárky +bylo zřetelné, rozlišené a~správné. diff --git a/tex/context/sample/third/krdel-sk.tex b/tex/context/sample/third/krdel-sk.tex index 2f2395427..d0db0b64f 100644 --- a/tex/context/sample/third/krdel-sk.tex +++ b/tex/context/sample/third/krdel-sk.tex @@ -1,7 +1,6 @@ - KŔDEĽ ŠŤASTNÝCH ĎATĽOV UČÍ PRI ÚSTÍ VÁHU MĹKVÉHO KOŇA OBHRÝZAŤ KÔRU A ŽRAŤ ČERSTVÉ MÄSO. Kŕdeľ šťastných ďatľov učí pri ústí Váhu mĺkveho koňa obhrýzať kôru a žrať čerstvé mäso. -0123456789 :;!?()[]\{\} -/--/--- ÖÜŮŘ öüůř +0123456789 :;!?()[]\{\} -/--/--- ÖÜŮŘ öüůř diff --git a/tex/context/sample/third/kun-cz.tex b/tex/context/sample/third/kun-cz.tex index ee1471c1b..d629d8942 100644 --- a/tex/context/sample/third/kun-cz.tex +++ b/tex/context/sample/third/kun-cz.tex @@ -1,7 +1,6 @@ - ŽLUŤOUČKÝ KŮŇ ÚPĚL ĎÁBELSKÉ ÓDY, žluťoučký kůň úpěl ďábelské ódy. -0123456789 :;!?()[]\{\} -/--/--- ŕĺľäöü ŔĹĽÄÖÜ +0123456789 :;!?()[]\{\} -/--/--- ŕĺľäöü ŔĹĽÄÖÜ diff --git a/tex/context/sample/third/pope-en.tex b/tex/context/sample/third/pope-en.tex new file mode 100644 index 000000000..198ca6245 --- /dev/null +++ b/tex/context/sample/third/pope-en.tex @@ -0,0 +1,28 @@ +\startlanguage[en] +\startlines +Happy the man, whose wish and care +A few paternal acres bound, +Content to breathe his native air +In his own ground. + +Whose herds with milk, whose fields with bread, +Whose flocks supply him with attire, +Whose trees in summer yield him shade, +In winter fire. + +Blest, who can unconcern'dly find +Hours, days, and years slide soft away, +In health of body, peace of mind, +Quiet by day; + +Sound sleep by night; study and ease, +Together mix'd; sweet recreation; +And innocence, which most does please, +With meditation. + +Thus let me live, unseen, unknown, +Thus unlamented let me die, +Steal from the world, and not a stone +Tell where I lie. +\stoplines +\stoplanguage diff --git a/tex/context/sample/third/pope-es.tex b/tex/context/sample/third/pope-es.tex new file mode 100644 index 000000000..d7fc414de --- /dev/null +++ b/tex/context/sample/third/pope-es.tex @@ -0,0 +1,28 @@ +\startlanguage[es] +\startlines +Feliz quien goza en ocuparse en calma +De unas hectáreas del sol paterno, +Feliz quien puede respirar, gozoso, +Su aire nativo. + +Cuyo hato brindale espumosa leche, +Pan sus trigales, sus ovejas lana, +Sombra en verano sus frondosos árboles, +Fuego en invierno. + +Feliz de aquel que indiferente observa +Cómo las horas se deslizan mansas, +Sano de cuerpo y con tranquilo espiritu, +Día por día. + +Quien duerme, plácido, y el estudio alterna +Con el reposo, y ameniza el tiempo, +Y une a su pura sencillez dulcisimas +Meditaciones. + +Dejad que viva en dulce paz oculto, +Dejad que muera sin lamentos múltiples, +Que me hurte al mundo y ni una losa diga +Donde reposo. +\stoplines +\stoplanguage diff --git a/tex/context/sample/third/readme.txt b/tex/context/sample/third/readme.txt new file mode 100644 index 000000000..24fc809e4 --- /dev/null +++ b/tex/context/sample/third/readme.txt @@ -0,0 +1,128 @@ +------------------------------------------------------------------------------------ +aesop-de.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +aristotle-grc.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +capek-cz.tex capek-vlnka-cz.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +cervantes-es.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +dequincey.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +dyrynk-cz.tex dyrynk-vlnka-cz.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +herbert-en.tex herbert-es.tex +------------------------------------------------------------------------------------ + +Virtue Traducción de Fernando Maristany (1918) +Virtud Translation by Fernando Maristany (1918) + +------------------------------------------------------------------------------------ +hviezdoslav-sk.tex hviezdoslav-vlnka-sk.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +jaros-sk.tex jaros-vlnka-sk.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +khatt-ar.tex khatt-en.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +kollar-cz.tex kollar-vlnka-cz.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +komensky-cz.tex komensky-vlnka-cz.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +krdel-sk.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +kun-cz.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +pope-en.tex pope-es.tex +------------------------------------------------------------------------------------ + +Ode on solitude Translation by Fernando Maristany (1918) +Oda a la soledad Traducción de Fernando Maristany (1918) + +------------------------------------------------------------------------------------ +quevedo-es.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +shakespeare-en.tex shakespeare-es.tex +------------------------------------------------------------------------------------ + +Sonnet 18 Translation by Fernando Maristany (1918) +Soneto XVIII Traducción de Fernando Maristany (1918) + +------------------------------------------------------------------------------------ +shelley-en.tex shelley-es.tex shelley-fr.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +slova-sk.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +smrek-sk.tex smrek-vlnka-sk.tex +------------------------------------------------------------------------------------ + +no comment + +------------------------------------------------------------------------------------ +vallejo-trilce-es.tex +------------------------------------------------------------------------------------ + +Poema XXXIII diff --git a/tex/context/sample/third/shakespeare-en.tex b/tex/context/sample/third/shakespeare-en.tex new file mode 100644 index 000000000..c06d1954d --- /dev/null +++ b/tex/context/sample/third/shakespeare-en.tex @@ -0,0 +1,21 @@ +\startlanguage[en] +\startlines +Shall I compare thee to a summer’s day? +Thou art more lovely and more temperate: +Rough winds do shake the darling buds of May, +And summer’s lease hath all too short a date: + +Sometime too hot the eye of heaven shines, +And often is his gold complexion dimmed; +And every fair from fair sometime declines, +By chance, or nature’s changing course, untrimmed: + +But thy eternal summer shall not fade, +Nor lose possession of that fair thou ow’st; +Nor shall Death brag thou wander’st in his shade +When in eternal lines to time thou grow’st: + +So long as men can breathe or eyes can see, +So long lives this, and this gives life to thee. +\stoplines +\stoplanguage diff --git a/tex/context/sample/third/shakespeare-es.tex b/tex/context/sample/third/shakespeare-es.tex new file mode 100644 index 000000000..1567368f2 --- /dev/null +++ b/tex/context/sample/third/shakespeare-es.tex @@ -0,0 +1,21 @@ +\startlanguage[es] +\startlines +¿Te puedo comparar con el estío? +Tú eres más atractiva y más suave; +El huracán desflora a su albedrío, +Y el paso del verano es del ave. + +La pupila del cielo es harto cálida; +La faz de oro amenudo palidece; +La más pura belleza queda pálida, +Pues todo en la Natura descaece. + +Mas tú no puedes nunca marchitarte, +Tu belleza jamás se velará, +Y la muerte en sus sombras ocultarte, +Cuando acabes la senda, no podrá. + +Mientras la humanidad no esté extinguida +Tu estio vivirá y te dará vida. +\stoplines +\stoplanguage diff --git a/tex/context/sample/third/shelley-en.tex b/tex/context/sample/third/shelley-en.tex new file mode 100644 index 000000000..12e336b18 --- /dev/null +++ b/tex/context/sample/third/shelley-en.tex @@ -0,0 +1,21 @@ +\startlanguage[en] +\startlines +I met a traveller from an antique land, +Who said—\quotation{Two vast and trunkless legs of stone +Stand in the desert. . . . Near them, on the sand, +Half sunk a shattered visage lies, whose frown, + +And wrinkled lip, and sneer of cold command, +Tell that its sculptor well those passions read +Which yet survive, stamped on these lifeless things, +The hand that mocked them, and the heart that fed; + +And on the pedestal, these words appear: +My name is Ozymandias, King of Kings; +Look on my Works, ye Mighty, and despair! + +Nothing beside remains. Round the decay +Of that colossal Wreck, boundless and bare +The lone and level sands stretch far away.} +\stoplines +\stoplanguage
\ No newline at end of file diff --git a/tex/context/sample/third/shelley-es.tex b/tex/context/sample/third/shelley-es.tex new file mode 100644 index 000000000..57dcb2ad5 --- /dev/null +++ b/tex/context/sample/third/shelley-es.tex @@ -0,0 +1,21 @@ +\startlanguage[es] +\startlines +Conocí a un viajero de una tierra antigua +quien dijo: «dos enormes piernas pétreas, sin su tronco +se yerguen en el desierto. A su lado, en la arena, +semihundido, yace un rostro hecho pedazos, cuyo ceño + +y mueca en la boca, y desdén de frío dominio, +cuentan que su escultor comprendió bien esas pasiones +las cuales aún sobreviven, grabadas en estos inertes objetos, +a las manos que las tallaron y al corazón que las alimentó. + +Y en el pedestal se leen estas palabras: +\quotation{Mi nombre es Ozymandias, rey de reyes: +¡Contemplad mis obras, poderosos, y desesperad!} + +Nada queda a su lado. Alrededor de la decadencia +de estas colosales ruinas, infinitas y desnudas +se extienden, a lo lejos, las solitarias y llanas arenas». +\stoplines +\stoplanguage
\ No newline at end of file diff --git a/tex/context/sample/third/shelley-fr.tex b/tex/context/sample/third/shelley-fr.tex new file mode 100644 index 000000000..c9133e464 --- /dev/null +++ b/tex/context/sample/third/shelley-fr.tex @@ -0,0 +1,21 @@ +\startlanguage[fr] +\startlines +J’ai rencontré un voyageur de retour d’une terre antique +Qui m'a dit : \quotation{Deux immenses jambes de pierre dépourvues de buste +Se dressent dans le désert. Près d’elles, sur le sable, +À moitié enfoui, gît un visage brisé dont le sourcil froncé, + +La lèvre plissée et le rictus de froide autorité +Disent que son sculpteur sut lire les passions +Qui, gravées sur ces objets sans vie, survivent encore +À la main qui les imita et au cœur qui les nourrit. + +Et sur le piédestal il y a ces mots : +\quote{Mon nom est Ozymandias, Roi des Rois. +Voyez mon œuvre, ô puissants, et désespérez !} + +À côté, rien ne demeure. Autour des ruines +De cette colossale épave, infinis et nus, +Les sables monotones et solitaires s’étendent au loin.} +\stoplines +\stoplanguage
\ No newline at end of file diff --git a/tex/context/sample/third/vallejo-trilce-es.tex b/tex/context/sample/third/vallejo-trilce-es.tex new file mode 100644 index 000000000..09f052e6a --- /dev/null +++ b/tex/context/sample/third/vallejo-trilce-es.tex @@ -0,0 +1,28 @@ +%Poema XXXIII +\startlanguage[es] +\startlines +999 calorías. +Rumbbb . . . . Trrraprrrr rrach . . . chaz +Serpentínica u del bizcochero +engirafada al tímpano. + +Quién como los hielos. Pero nó. +Quién como lo que va ni más ni menos. +Quién como el justo medio. + +1.000 calorías. +Azulea y ríe su gran cachaza el firmamento gringo. Baja +el sol empavado y le alborota los cascos +al más frío. + +Remeda al cuco: Roooooooeeeis. +tierno autocarril, móvil de sed, +que corre hasta la playa. + +Aire, aire! Hielo! +Si al menos el calor (------Mejor +no digo nada. + +Treinta y tres trillones trescientos treinta y tres calorías. +\stoplines +\stoplanguage diff --git a/tex/generic/context/luatex/luatex-fonts-merged.lua b/tex/generic/context/luatex/luatex-fonts-merged.lua index 2831df551..c999f34d5 100644 --- a/tex/generic/context/luatex/luatex-fonts-merged.lua +++ b/tex/generic/context/luatex/luatex-fonts-merged.lua @@ -1,6 +1,6 @@ -- merged file : c:/data/develop/context/sources/luatex-fonts-merged.lua -- parent file : c:/data/develop/context/sources/luatex-fonts.lua --- merge date : 2020-08-06 18:55 +-- merge date : 2020-08-07 23:34 do -- begin closure to overcome local limits and interference |