summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/expl3/l3vers.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/latex/expl3/l3vers.dtx')
-rw-r--r--Master/texmf-dist/source/latex/expl3/l3vers.dtx72
1 files changed, 37 insertions, 35 deletions
diff --git a/Master/texmf-dist/source/latex/expl3/l3vers.dtx b/Master/texmf-dist/source/latex/expl3/l3vers.dtx
index b3cbde577bd..c61d07ce94c 100644
--- a/Master/texmf-dist/source/latex/expl3/l3vers.dtx
+++ b/Master/texmf-dist/source/latex/expl3/l3vers.dtx
@@ -1,5 +1,5 @@
% \iffalse
-%% File: l3vers.dtx Copyright (C) 1990-2008 LaTeX3 project
+%% File: l3vers.dtx Copyright (C) 1990-2009 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
@@ -17,7 +17,7 @@
%%
%% The development version of the bundle can be found at
%%
-%% http://www.latex-project.org/cgi-bin/cvsweb.cgi/
+%% http://www.latex-project.org/svnroot/experimental/trunk/
%%
%% for those people who are interested.
%%
@@ -35,7 +35,7 @@
\RequirePackage{l3names}
%</driver|package>
%\fi
-\GetIdInfo$Id: l3vers.dtx 769 2008-08-05 19:48:40Z morten $
+\GetIdInfo$Id: l3vers.dtx 1378 2009-06-01 19:15:56Z joseph $
{L3 Experimental LaTeX format version}
%\iffalse
%<*driver>
@@ -43,28 +43,45 @@
\ProvidesFile{\filename.\filenameext}
[\filedate\space v\fileversion\space\filedescription]
%\iffalse
-\documentclass{l3doc}
+\documentclass[full]{l3doc}
\begin{document}
\DocInput{\filename.\filenameext}
\end{document}
%</driver>
% \fi
%
+% \begin{documentation}
+%
% \section{Version Identification}
% Here we identify the date and version number of this release of
% \LaTeX3, and set |\tex_everyjob:D| so that it is printed at the start of
% every \LaTeX3 run.
%
-% \StopEventually{}
+% \begin{variable}{\c_format_name|\c_format_date}
+% Name and date.
+% \end{variable}
+%
+% \begin{variable}{\c_fmt_too_old}
+% Age in months past "\c_format_date" after which an error is called
+% during format generation.
+% \end{variable}
+%
+% \begin{function}{\chk_format_age:w}
+% Function that calculates the age of the format and calls an error if it
+% is too old.
+% \end{function}
%
+% \end{documentation}
+%
+% \begin{implementation}
%
% \begin{macro}{\c_format_name}
% \begin{macro}{\c_format_date}
% \begin{macrocode}
%<*initex>
-\def:Npn\c_format_name{Experimental~ LaTeX3}
-\def:Npn\c_format_date{2008/08/05}
-%^^A\def:Npx\c_format_version{--release--date--goes--here--}
+\cs_set_nopar:Npn\c_format_name{Experimental~ LaTeX3}
+\cs_set_nopar:Npn\c_format_date{2009/06/01}
+%^^A\cs_set_nopar:Npx\c_format_version{--release--date--goes--here--}
% \end{macrocode}
% \end{macro}
% \end{macro}
@@ -74,18 +91,18 @@
% Check that the format being made is not too old. While in development
% it should be a rather small number.
% \begin{macrocode}
-\const_new:Nn \c_fmt_too_old{12}
-\def:Npn\chk_format_age:w #1/#2/#3\q_stop{
+\int_const:Nn \c_fmt_too_old{12}
+\cs_set_nopar:Npn\chk_format_age:w #1/#2/#3\q_stop{
% \end{macrocode}
% We just calculate the age of this file in months and give a warning
% if deemed too old.
% \begin{macrocode}
- \num_compare:nNnT{(\tex_year:D-#1)*12+\tex_month:D-#2}>\c_fmt_too_old
- {\iow_expanded_term:n{^^J
+ \intexpr_compare:nNnT{(\tex_year:D-#1)*12+\tex_month:D-#2}>\c_fmt_too_old
+ {\iow_term:x{^^J
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!^^J
!~~You~are~attempting~to~make~an~experimental~LaTeX3~format~from^^J
!~~source~files~that~are~more~than~
- \num_value:w\num_eval:n{\c_fmt_too_old}~months~old.^^J
+ \intexpr_eval:n{\c_fmt_too_old}~months~old.^^J
!^^J
!~~If~you~enter~<return>~to~scroll~past~this~message~then~the~format^^J
!~~will~be~built,~but~please~consider~obtaining~newer~source~files^^J
@@ -96,7 +113,7 @@
To~avoid~this~error~message,~obtain~new~Experimental~LaTeX3~sources.}
\tex_errmessage:D{
Experimental~LaTeX3~source~files~are~more~than~
- \num_use:N\num_eval:n{\c_fmt_too_old}~months~old!}
+ \intexpr_eval:n{\c_fmt_too_old}~months~old!}
}
}
% \end{macrocode}
@@ -104,7 +121,7 @@
% \end{macro}
% Then we execute it.
% \begin{macrocode}
-\exp_after:NN\chk_format_age:w\c_format_date\q_stop
+\exp_after:wN\chk_format_age:w\c_format_date\q_stop
% \end{macrocode}
% And since it's no longer needed we remove it again.
% \begin{macrocode}
@@ -114,27 +131,12 @@
% This startup banner may be further modified by the code in
% |ltfinal.dtx| if a patch file is present.
% \begin{macrocode}
-\tex_everyjob:D{\io_put_term:x{\c_format_name,~<\c_format_date>}}
-\io_put_term:x{\c_format_name,~<\c_format_date>}
+\tex_everyjob:D{\iow_term:x{\c_format_name,~<\c_format_date>}}
+\iow_term:x{\c_format_name,~<\c_format_date>}
%</initex>
% \end{macrocode}
%
-% \endinput
-%
-% $Log$
-% Revision 1.5 2005/12/27 15:54:15 morten
-% Changed RCS information retrieval
-%
-% Revision 1.4 2005/04/13 09:52:47 morten
-% Fix spaces in messages, make fast calculation of format age, fixed \DocInput, added \endinput
-%
-% Revision 1.3 2005/04/12 22:42:22 braams
-% Removed a few redundant lines with docstrip instructions
-%
-% Revision 1.2 2005/04/11 22:46:47 braams
-% Translated this file into the ltx3 lingo
-% This file may need further cleanup at a later stage
-%
-% Revision 1.1 2005/03/11 21:26:31 braams
-% File copied from 2e for now, to hold the format version identification
+% \end{implementation}
+% \PrintIndex
%
+% \endinput