diff options
Diffstat (limited to 'Master/texmf-dist/source/latex/expl3/l3vers.dtx')
-rw-r--r-- | Master/texmf-dist/source/latex/expl3/l3vers.dtx | 72 |
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 |