Leggendo il codice, ti dico che è non molto difficile da capire, anche se non mi sarebbe venuto mai in mente.
Vorrei qualche chiarimento.
Nella prima definizione
`
\def\line@under@label#1#2{%
\dimen@=#1 \advance\dimen@ 1cm
\vtop{\hbox{\strut#2}\nointerlineskip
\hbox to #1{\hss\vrule width \dimen@ height 0.4pt}\vss}}`
Non ho capito solo cosa fa \vtop e quale è il ruolo di \strut; per il resto è tutto semplice.
Nella seconda definizione
`
\long\def\@makecaption#1#2{%\small
\vskip\abovecaptionskip
\sbox0{#1:\enspace}% [1]
\hangindent\wd0 \hangafter1 [2]
\sbox2{#1:}% [3]
\leavevmode\line@under@label{\wd2}{#1:}\enspace #2\par
\vskip\belowcaptionskip}`
non ho capito cosa fanno le righe [1], [2] e [3] ed il ruolo di \leavevmode tra la riga [3] e
\line@under@label. Per ultimo ti chiedo quale è la differenza tra \def e \long\def.