Макросы Plain TeX содержат \par в качестве разделителя параметров, но не работают с \obeylines. Почему?

Question

Я просто хотел отформатировать .csvфайл, поэтому я провожу тест (1), показанный ниже:

\global\let\xpar=\par
\def\format#1,#2,#3\par{$#1\times #2=#3$\xpar}
\begingroup
\everypar={\format}\obeylines%
11,2,22
13,9,117
a,b,c
\endgroup
\end

но это не работает, TeX жалуется, что

! File ended while scanning use of \format.
<inserted text> 
            \par 

поэтому я удаляю \obeylines, провожу еще один тест (2):

\global\let\xpar=\par
\def\format#1,#2,#3\par{$#1\times #2=#3$\xpar}
\begingroup
\format 11,2,22

\format 13,9,117

\format a,b,c

\endgroup
\end

работает отлично. Кто может сказать, где ошибка в тесте (1)?

Answer 1

\obeylinesна простом языке это

{\catcode`\^^M=\active % these lines must end with %
  \gdef\obeylines{\catcode`\^^M\active \let^^M\par}%
  \global\let^^M\par}

То есть он делает концы линии активными letи\par

Это означает, что вам необходимо ограничить свой макрос активным элементом , ^^Mа не токеном; токен не находится в сканируемом потоке, он генерируется только в том случае, если расширяется токен конца строки.\par\par

\begingroup
\everypar={\format}\obeylines%
\def\format#1,#2,#3^^M{$#1\times #2=#3$\par}%
11,2,22
13,9,117
a,b,c
\endgroup
\end

Answer 2

Если файл brooks.csvсодержит

11,2,22
13,9,117
a,b,c

то, вероятно, лучше читать его построчно. Для этого требуется e-TeX, но это можно реализовать и в Knuth TeX.

\def\format#1,#2,#3\format{$#1\times#2=#3$\par}
\newread\brooksread

\hsize=.5\hsize % just for the example

\noindent X\hrulefill X\par

\openin\brooksread=brooks.csv
\begingroup\endlinechar=-1
\loop\unless\ifeof\brooksread
  \read\brooksread to \test \show\test
  \unless\ifx\test\empty
    \expandafter\format\test\format
  \fi
\repeat
\endgroup

\noindent X\hrulefill X\par

\bye