summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/genmisc/compare.tex
blob: 05976cbe8651caf4c2d8c135e3650d0e753dae8d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
% compare.tex - macro to compare two strings
% By \'Eamonn McManus.  This file is not copyrighted.

\def\compare#1#2{\compcont#1\ \\#2\ \\}
\def\compcont#1#2\\#3#4\\{%
     \csname comp%
       \if #1#3\if #1\ same\else cont\fi
       \else \ifnum `#1<`#3less\else greater\fi \fi
     \endcsname #2\\#4\\}
\def\compsame#1\\#2\\{0}
\def\compless#1\\#2\\{-1}
\def\compgreater#1\\#2\\{1}