% 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}