summaryrefslogtreecommitdiff
path: root/usergrps/uktug/baskervi/5_5/hhutils0.sty
blob: 2f37f76a4245d89c2ecaace936316b911b7ead4e (plain)
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
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{hhutils0}[1995/04/07 hh's internal LaTeX-extensions]

\def\newtoks{\alloc@5\toks\toksdef\@cclvi}

\def\h@newdimen#1{\ifx#1\undefined\newdimen#1\else\ifx#1\relax\newdimen#1\fi\fi}
\def\h@newbox#1{\ifx#1\undefined\newbox#1\else\ifx#1\relax\newbox#1\fi\fi}
\def\h@newtoks#1{\ifx#1\undefined\newtoks#1\else\ifx#1\relax\newtoks#1\fi\fi}

\def\@namegdef#1{\expandafter\gdef\csname #1\endcsname}
\def\@namexdef#1{\expandafter\xdef\csname #1\endcsname}

% old definition:
% \long\def\h@ifespecified#1#2#3{\edef\@@@arg{#1}\ifx\@@@arg\@empty #3\else #2\fi}

\def\h@ifespecified{\h@ifdspecified\edef}
\def\h@ifspecified{\h@ifdspecified\def}
\long\def\h@ifdspecified#1#2#3#4{%
  #1\@@@arg{#2}%
  \ifx\@@@arg\@empty\def\next{#4}\else\def\next{#3}\fi\next}

\def\h@ifstr#1#2#3#4{%
  \def\@@@a{#1}\def\@@@b{#2}%
  \ifx\@@@a\@@@b\def\next{#3}\else\def\next{#4}\fi\next}