summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/expl3/l3alloc.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/latex/expl3/l3alloc.dtx')
-rw-r--r--Master/texmf-dist/source/latex/expl3/l3alloc.dtx12
1 files changed, 5 insertions, 7 deletions
diff --git a/Master/texmf-dist/source/latex/expl3/l3alloc.dtx b/Master/texmf-dist/source/latex/expl3/l3alloc.dtx
index 9b3509c95e3..509a7f9ae15 100644
--- a/Master/texmf-dist/source/latex/expl3/l3alloc.dtx
+++ b/Master/texmf-dist/source/latex/expl3/l3alloc.dtx
@@ -36,7 +36,7 @@
\RequirePackage{l3names}
%</driver>
%\fi
-\GetIdInfo$Id: l3alloc.dtx 2063 2010-10-03 08:26:49Z mittelba $
+\GetIdInfo$Id: l3alloc.dtx 2153 2011-02-16 10:37:45Z will $
{L3 Experimental register allocation}%
%\iffalse
%<*driver>
@@ -188,20 +188,18 @@
% \end{macrocode}
% Then we need to check whether we have run out of registers.
% \begin{macrocode}
- \int_compare:nNnTF
- { \tl_use:c{g_#2_allocation_tl} } = { \tl_use:c{l_#2_allocation_tl} }
- {
+ \tex_ifnum:D \etex_numexpr:D
+ \tl_use:c{g_#2_allocation_tl} \tex_relax:D = \etex_numexpr:D \tl_use:c{l_#2_allocation_tl} \tex_relax:D
\iow_term:x {
We~ ran~ out~ of~
\if:w #1 g \scan_stop: global~ \else: local~ \fi:
'l#2!'~ registers!
}
- }
+ \tex_else:D
% \end{macrocode}
% We also need to check whether the value of the counter already
% occurs in the list of already allocated registers.
% \begin{macrocode}
- {
\seq_if_in:cxTF {g_#2_allocation_seq} {\tl_use:c{#1_#2_allocation_tl}}
{
\iow_log:x{ \tl_use:c{#1_#2_allocation_tl}~already~allocated. }
@@ -212,7 +210,7 @@
% the register we will assign a control sequence for.
% \begin{macrocode}
{ \iow_log:x{\tl_use:c{#1_#2_allocation_tl}~free.} }
- }
+ \tex_fi:D
}
% \end{macrocode}
% \end{macro}