summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/expl3/l3toks.sty
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-12 23:55:26 +0000
committerKarl Berry <karl@freefriends.org>2006-01-12 23:55:26 +0000
commitc46a8cff75c54bb399a1879724c1ae8a37b13d66 (patch)
tree87a7949b16876363f6f43316b0443598fe5d4708 /Master/texmf-dist/tex/latex/expl3/l3toks.sty
parentc13c9fba05d6822e236462817e8c1f95f220988b (diff)
expl3
git-svn-id: svn://tug.org/texlive/trunk@897 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/expl3/l3toks.sty')
-rw-r--r--Master/texmf-dist/tex/latex/expl3/l3toks.sty73
1 files changed, 73 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/expl3/l3toks.sty b/Master/texmf-dist/tex/latex/expl3/l3toks.sty
new file mode 100644
index 00000000000..3db8ed5adbb
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/expl3/l3toks.sty
@@ -0,0 +1,73 @@
+%%
+%% This is file `l3toks.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% l3toks.dtx (with options: `package,trace')
+%%
+%%
+%% 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: l3toks.dtx Copyright (C) 1990-1998 LaTeX3 project
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{l3toks}
+ [1998/05/14 v1.0g L3 Experimental Token Registers]
+\RequirePackage{l3expan}\par
+\def_new:Npn \toks_new:N {}
+\let:NN \toks_new:N \newtoks % nick from LaTeX for the moment
+\def_new:Npn \toks_clear:N #1{#1\c_empty_toks
+}
+\def_new:Npn \toks_gclear:N {
+ \pref_global:D
+ \toks_clear:N}
+\let_new:NN \toks_use:N \the_internal:D
+\def_new:Npn \toks_use_clear:N#1{
+ \exp_after:NN
+ \toks_clear:N
+ \exp_after:NN
+ #1
+ \toks_use:N#1}
+\def_new:Npn \toks_use_gclear:N{
+ \pref_global:D
+ \toks_use_clear:N}
+\def_new:Npn \toks_put_left:Nn #1{\exp_after:NN\toks_put_left_aux:w
+ \toks_use:N #1\q_stop #1}
+\def_new:Npn \toks_gput_left:Nn {
+ \pref_global:D
+ \toks_put_left:Nn}
+\def_long_new:Npn \toks_put_left_aux:w #1\q_stop #2#3{#2{#3#1}
+}
+\def_long_new:Npn \toks_put_right:Nn #1#2{#1\exp_after:NN{\toks_use:N #1#2}
+}
+\def_new:Npn \toks_gput_right:Nn {
+ \pref_global:D
+ \toks_put_right:Nn}
+\def_new:Npn \toks_gput_right:Nx {\exp_args:Nnx\toks_gput_right:Nn}
+ \let_new:NN \toks_set:Nn\use_noop:
+\def_new:Npn \toks_set:No {\exp_args:NNo \toks_set:Nn}
+\def_new:Npn \toks_set:Nx {\exp_args:NNx \toks_set:Nn}
+ \let_new:NN \toks_gset:Nn\pref_global:D
+\def_new:Npn \toks_gset:No {\exp_args:NNo \toks_gset:Nn}
+\def_new:Npn \toks_gset:Nx {\exp_args:NNx \toks_gset:Nn}
+ \let_new:NN \toks_set_eq:NN \use_noop:
+ \let_new:NN \toks_gset_eq:NN \pref_global:D
+\def_new:Npn\toks_empty:NTF#1{
+ \tlp_set:No\l_testa_tlp{\toks_use:N#1}
+ \tlp_empty:NTF\l_testa_tlp}
+\tex_toksdef:D \l_tmpa_toks = 255
+\toks_new:N \l_tmpb_toks
+\toks_new:N \l_tmpc_toks
+\toks_new:N \g_tmpa_toks
+\toks_new:N \g_tmpb_toks
+\toks_new:N \g_tmpc_toks
+\toks_new:N \c_empty_toks
+%%
+%%
+%% End of file `l3toks.sty'.