Inverted token list in a table

Question

I read a lot of questions and answers about this matter, each doing a little of what I was looking for, but when I tried to merge them together, the whole world collapsed...

My goal is to build a revision table at the beginnig of my document. I found Generate automatic revision's numbering tabular that do it pretty nicely. The thing is that my compagny requires the revision to be "last first" order. So using the example, when I use

\AddRevision{2017-04-28}{Initial Release}{Miraino Hikari}
\AddRevision{2017-05-02}{Modification for something}{Jo Someone}

I got this result

Revisions:
0   2017-04-28     Initial Release                     Miraino Hikari
1   2017-05-02     Modification after some revision        Jo Someone

but what I would like is

Revisions:
1   2017-05-02     Modification after some revision        Jo Someone
0   2017-04-28     Initial Release                     Miraino Hikari

So I found a way to revert a list here: How to invert list used for a tikz foreach loop which work again really great when you have a normal list, but not so fine when you try to build a tabular. Then I found How do I use the ampersand (&) inside a foreach or conditional (or other group/environment) when building tables? that work similarly to the Revision numbering tabular example, but again, I can't see how to revert my list.

To do some tests, I tried to use all these example to try to generate the "First-Top" and "Last-Top" example. (Names changed to keep the original working)

\let\revlist\empty
\let\revlistI\empty

\newcommand\NewAddRevTable[1]{%
    \ifx\revlist\empty
        \xdef\revlist{#1}%
        \xdef\revlistI{#1}%
    \else
        \xdef\revlist{\revlist,{#1}}%
        \xdef\revlistI{{#1},\revlistI}%
    \fi
}

\newcommand*\MyRevisionTable{
    \begin{flushleft}
        \textbf{\iflanguage{french}{Révisions :}{Revisions:}}\\
    \end{flushleft}
    \begin{table}[H]
        \begin{tabularx}{\textwidth}{llXr}
            \foreach\rev in \revlist {
                \rev\\
            }
        \end{tabularx}
    \end{table}
}

\newcounter{MyRevCounter}
\newcommand{\NewRevision}[3]{ 
    \NewAddRevTable{\arabic{MyRevCounter} & #1 & #2 & #3} 
    \stepcounter{MyRevCounter}
}%

\NewRevision{2017-04-28}{Version initiale}{Miraino Hikari}
\NewRevision{2017-05-02}{Modification after some revision}{Jo Someone}

this code of course, doesn't work (except if I escape the & and that I remove the tabularx environment). But changing the revlist for revlistI do exactly what I was looking for (except it's not in a table)

and I suspect that the magic in the original revision code happen here

\newcommand\AddNewRevTableTokens[1]{\global\@myrevtabtoks\expandafter{\the\@myrevtabtoks#1}}
\newcommand\eAddNewRevTableTokens[1]{%
    \protected@edef\NewRevTkTable{#1}%
    \expandafter\AddNewRevTableTokens\expandafter{\NewRevTkTable}%  
}

but for this I tried

\newcommand\AddNewRevTableTokens[1]{\global\@myrevtabtoks\expandafter{\the\@myrevtabtoks#1}}
\newcommand\eAddNewRevTableTokens[1]{%
    \expandafter\AddNewRevTableTokens\expandafter{\NewRevTkTable}%  
    \protected@edef\NewRevTkTable{#1}%
}

which just don't care about any extra revision, and this

\newcommand\AddNewRevTableTokens[1]{\global\@myrevtabtoks\expandafter{#1\the\@myrevtabtoks}}
\newcommand\eAddNewRevTableTokens[1]{%
    \protected@edef\NewRevTkTable{#1}%
    \expandafter\AddNewRevTableTokens\expandafter{\NewRevTkTable}%  
}

That just don't compile with an error that says

TeX capacity exceeded, sorry [input stack size=5000]. \MyRevisionTable

So I need help. Thanks in advance.

Answer 1

Here some code to get both orders:

\documentclass{article}   

\usepackage{xparse}
\ExplSyntaxOn

\tl_new:N   \l_rev_tablecontents_first_tl
\tl_new:N   \l_rev_tablecontents_last_tl
\int_new:N  \l_rev_counter_int

\NewDocumentCommand\ClearRevision { }
 {
  \tl_clear:N \l_rev_tablecontents
  \int_zero:N \l_rev_counter_int
 }

\NewDocumentCommand\AddRevision { m m m}
{
  \int_incr:N  \l_rev_counter_int
  \tl_put_left:Nn \l_rev_tablecontents_last_tl   { #1 & #2 & #3 \\}
  \tl_put_left:Nx \l_rev_tablecontents_last_tl   { \int_to_arabic:n { \l_rev_counter_int }  & }
  \tl_put_left:Nn \l_rev_tablecontents_last_tl   {Revision \c_space_tl} 
  \tl_put_right:Nn \l_rev_tablecontents_first_tl {Revision \c_space_tl}
  \tl_put_right:Nx \l_rev_tablecontents_first_tl { \int_to_arabic:n { \l_rev_counter_int }  & }
  \tl_put_right:Nn \l_rev_tablecontents_first_tl { #1 & #2 & #3 \\}
}

\NewDocumentCommand\PrintRevisionFirst { }
  { 
   \begin{tabular}{lccl}
       \l_rev_tablecontents_first_tl
   \end{tabular} 
  }


\NewDocumentCommand\PrintRevisionLast { }
  {
   \begin{tabular}{lccl}
       \l_rev_tablecontents_last_tl
   \end{tabular}
  }


\ExplSyntaxOff

%-----------------------------------------------------------


\AddRevision{2017-04-28}{Initial Release}{Miraino Hikari}
\AddRevision{2017-05-02}{Modification for something}{Jo Someone}

\begin{document}

    \PrintRevisionFirst 

   \bigskip   
    \PrintRevisionLast
\end{document}

If you want to start with zero, move the \int_incr to the end.

Answer 2

If the revisions are entered in chronological order, it's quite easy to get them in reverse order when they are to be printed: just store them in reverse order! ;-)

\documentclass{article}
\usepackage{xparse,tabularx}

\ExplSyntaxOn

\NewDocumentCommand{\AddRevision}{mmm}
 {
  \hikari_revision_add:nnn { #1 } { #2 } { #3 }
 }
\NewDocumentCommand{\PrintRevisions}{}
 {
  \begin{center}
  \cs_set_eq:NN \__hikari_revision_do:nnnn \hikari_revision_print_entry:nnnn
  \begin{tabularx}{\textwidth}{llXr}
  \multicolumn{4}{l}{Revisions} \\
  \hline
  \hikari_revision_print:
  \\\hline
  \end{tabularx}
  \end{center}
 }

\seq_new:N \g_hikari_revision_list_seq
\int_new:N \g_hikari_revision_number_int

\cs_new_protected:Nn \hikari_revision_add:nnn
 {
  \seq_gput_left:Nx \g_hikari_revision_list_seq
   {
    \exp_not:N \__hikari_revision_do:nnnn
     { \int_eval:n { \g_hikari_revision_number_int } }
     \exp_not:n { { #1 } { #2 } { #3 } }
   }
  \int_incr:N \g_hikari_revision_number_int
 }

\cs_new_protected:Nn \hikari_revision_print:
 {
  \seq_use:Nn \g_hikari_revision_list_seq { \\ }
 }

\cs_new:Nn \hikari_revision_print_entry:nnnn
 {
  #1 & #2 & #3 & #4
 }

\ExplSyntaxOff

\begin{document}

\AddRevision{2017-04-28}{Initial Release}{Miraino Hikari}
\AddRevision{2017-05-02}{Modification for something}{Jo Someone}

\PrintRevisions

\end{document}

I use an indirect method for storing the entries, with a “dummy function” that we can make equal to some real function at call time. So the list of revisions can be used in different ways without changing the main code. Maybe you also want to print out the list of reviewers or the dates: just define a suitable function like I did for \hikari_revision_print_entry:nnnn.

A different version that allows \AddRevision to be in whatever order in the document. The items are sorted by (reverse) date as part of \PrintRevisions.

\documentclass{article}
\usepackage{xparse,tabularx}

\ExplSyntaxOn

\NewDocumentCommand{\AddRevision}{mmm}
 {
  \hikari_revision_add:nnn { #1 } { #2 } { #3 }
 }
\NewDocumentCommand{\PrintRevisions}{}
 {
  \begin{center}
  \cs_set_eq:NN \__hikari_revision_do:nnn \hikari_revision_date:nnn
  \seq_set_eq:NN \l__hikari_revision_temp_seq \g_hikari_revision_list_seq
  \seq_sort:Nn \l__hikari_revision_temp_seq
   {
    \int_compare:nNnTF
     { ##1 } > { ##2 }
     { \sort_return_same: }
     { \sort_return_swapped: }
   }
  \cs_set_eq:NN \__hikari_revision_do:nnn \hikari_revision_entry:nnn
  \int_gset:Nn \g__hikari_revision_entry_int { \seq_count:N \l__hikari_revision_temp_seq }
  \tl_clear:N \l__hikari_revision_tablebody_tl
  \seq_map_inline:Nn \l__hikari_revision_temp_seq
   {
    \int_gdecr:N \g__hikari_revision_entry_int
    \tl_put_right:Nf \l__hikari_revision_tablebody_tl
     { \int_to_arabic:n { \g__hikari_revision_entry_int } ##1 }
   }
  \begin{tabularx}{\textwidth}{llXr}
  \multicolumn{4}{l}{Revisions} \\
  \hline
  \tl_use:N \l__hikari_revision_tablebody_tl
  \hline
  \end{tabularx}
  \end{center}
 }

\seq_new:N \g_hikari_revision_list_seq
\seq_new:N \l__hikari_revision_temp_seq
\int_new:N \g__hikari_revision_entry_int
\tl_new:N \l__hikari_revision_tablebody_tl
\cs_generate_variant:Nn \tl_put_right:Nn { Nf }

\cs_new_protected:Nn \hikari_revision_add:nnn
 {
  \seq_gput_right:Nn \g_hikari_revision_list_seq
   {
    \__hikari_revision_do:nnn { #1 } { #2 } { #3 }
   }
 }

\cs_new:Nn \hikari_revision_entry:nnn
 {
   & #1 & #2 & #3 \\
 }

\cs_new:Nn \hikari_revision_date:nnn
 {
  \__hikari_revision_make_date:w #1 \q_stop
 }
\cs_new:Npn \__hikari_revision_make_date:w #1-#2-#3 \q_stop
 {
  #1#2#3
 }
\ExplSyntaxOff

\begin{document}

\AddRevision{2017-05-03}{Changed code for revisions}{egreg}

\AddRevision{2017-04-28}{Initial Release}{Miraino Hikari}
\AddRevision{2017-05-02}{Modification for something}{Jo Someone}

\PrintRevisions

\end{document}