diff options
author | Karl Berry <karl@freefriends.org> | 2015-12-20 23:00:54 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2015-12-20 23:00:54 +0000 |
commit | f4e67bebe6f832d21491cfa7ae1dfa9388899117 (patch) | |
tree | 3ecab4ba208e0c7ef72957758d26a48d8fc008b8 /Master/texmf-dist/tex/latex/l3kernel/expl3.lua | |
parent | 01185308aa1c1a77c8926a0432aeda02d7a240d9 (diff) |
l3 (20dec15)
git-svn-id: svn://tug.org/texlive/trunk@39152 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/l3kernel/expl3.lua')
-rw-r--r-- | Master/texmf-dist/tex/latex/l3kernel/expl3.lua | 68 |
1 files changed, 68 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/l3kernel/expl3.lua b/Master/texmf-dist/tex/latex/l3kernel/expl3.lua new file mode 100644 index 00000000000..c8f78ed2ce3 --- /dev/null +++ b/Master/texmf-dist/tex/latex/l3kernel/expl3.lua @@ -0,0 +1,68 @@ +-- +-- This is file `expl3.lua', +-- generated with the docstrip utility. +-- +-- The original source files were: +-- +-- l3luatex.dtx (with options: `package,lua') +-- +-- EXPERIMENTAL CODE +-- +-- Do not distribute this file without also distributing the +-- source files specified above. +-- +-- Do not distribute a modified version of this file. +-- +-- File: l3luatex.dtx Copyright (C) 2010-2015 The LaTeX3 Project +-- +-- It may be distributed and/or modified under the conditions of the +-- LaTeX Project Public License (LPPL), either version 1.3c of this +-- license or (at your option) any later version. The latest version +-- of this license is in the file +-- +-- http://www.latex-project.org/lppl.txt +-- +-- This file is part of the "l3kernel bundle" (The Work in LPPL) +-- and all files in that bundle must be distributed together. +-- +-- The released version of this bundle is available from CTAN. +-- +-- ----------------------------------------------------------------------- +-- +-- The development version of the bundle can be found at +-- +-- http://www.latex-project.org/svnroot/experimental/trunk/ +-- +-- for those people who are interested. +-- +--%%%%%%%%% +-- NOTE: %% +--%%%%%%%%% +-- +-- Snapshots taken from the repository represent work in progress and may +-- not work or may contain conflicting material! We therefore ask +-- people _not_ to put them into distributions, archives, etc. without +-- prior consultation with the LaTeX3 Project. +-- +-- ----------------------------------------------------------------------- +l3kernel = l3kernel or { } +local tex_setcatcode = tex.setcatcode +local tex_sprint = tex.sprint +local tex_write = tex.write +local unicode_utf8_char = unicode.utf8.char +local function strcmp(A, B) + if A == B then + tex_write("0") + elseif A < B then + tex_write("-1") + else + tex_write("1") + end +end +l3kernel.strcmp = strcmp +local charcat_table = l3kernel.charcat_table or 1 +local function charcat(charcode, catcode) + tex_setcatcode(charcat_table, charcode, catcode) + tex_sprint(charcat_table, unicode_utf8_char(charcode)) +end +l3kernel.charcat = charcat |