/usr/share/doc/texlive-doc/latex/epslatex-fr/block.sty is in texlive-lang-french 2015.20160223-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 | \ifx\endBlock\undefined
\def\BL@CK{\begingroup%
\def\endBL@CK{\egroup\endgroup}%
\vbox\bgroup}%
\long\def\Block{\begingroup%
\def\endBlock{\unskip\egroup\endgroup}%
\pagebreak[2]\vspace*{\parskip}\vbox\bgroup\par\noindent\ignorespaces}
\long\def\IBlock{\begingroup%
\def\endIBlock{\unskip\egroup\endgroup}%
\pagebreak[2]\vspace*{\parskip}\vbox\bgroup\par\ignorespaces}
%\newdimen\@@dimenA
% reservation verticale
%\def\need#1{{\ifhmode\unskip\par\fi
%% \@@dimenA=\pagegoal
% \@@dimenA=\textheight
% \advance\@@dimenA by -\pagetotal
% \ifdim\pagetotal>\z@
% \ifdim\@@dimenA>\z@
% \ifdim\@@dimenA<#1%
% \vfill\eject\typeout{WARNING- EJECT BY NEED}
% \fi
% \fi
% \fi}
%}
\def\need#1{\ifhmode\unskip\par\fi \penalty-100 \begingroup % preserve \dimen@, \dimen@i
\ifdim\prevdepth>\maxdepth \dimen@i\maxdepth \else \dimen@i\prevdepth\fi
\kern-\dimen@i
\dimen@\pagegoal \advance\dimen@-\pagetotal % space left
\ifdim #1>\dimen@
\vfill\eject\typeout{WARNING- EJECT BY NEED}
\fi
\kern\dimen@i
\endgroup}
\def\lneed#1{\need{#1\baselineskip}}
% \begin{BL@CK} ... \end{BL@CK} delimite un bloc qui restera, si possible, sur une seule page.
\long\def\TBlock{\begingroup%
\def\endTBlock{\unskip\egroup\endgroup}%
\pagebreak[2]\vspace*{\parskip}\vtop\bgroup\par\noindent\ignorespaces}
\else
\typeout{block.sty already loaded}
\fi
\endinput
\def\need#1{\par \penalty-100 \begingroup % preserve \dimen@, \dimen@i
\ifdim\prevdepth>\maxdepth \dimen@i\maxdepth \else \dimen@i\prevdepth\fi
\kern-\dimen@i
\dimen@\pagegoal \advance\dimen@-\pagetotal % space left
\ifdim #1>\dimen@ \vfil \eject \fi
\kern\dimen@i
\endgroup}
|