From c46a8cff75c54bb399a1879724c1ae8a37b13d66 Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Thu, 12 Jan 2006 23:55:26 +0000
Subject: expl3

git-svn-id: svn://tug.org/texlive/trunk@897 c570f23f-e606-0410-a88d-b1316a301751
---
 Master/texmf-dist/tex/latex/expl3/l3toks.sty | 73 ++++++++++++++++++++++++++++
 1 file changed, 73 insertions(+)
 create mode 100644 Master/texmf-dist/tex/latex/expl3/l3toks.sty

(limited to 'Master/texmf-dist/tex/latex/expl3/l3toks.sty')

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'.
-- 
cgit v1.2.3

