The microtype package

IMPLEMENTATION: Font setup 96\MT@check@font\MT@register@font\MT@register@subst@font2738 \MT@orig@add@accent{#1}{#2}%2739 \let\pickup@font\MT@pickupfont2740 }%2741 2742 }2743 }\relax2744 Consequently (if all goes well), we are the last ones to change these commands,therefore there is no need to check whether our definition has survived.Check whether we’ve already seen the current font.2745 \def\MT@check@font{\MT@exp@one@n\MT@in@clist\MT@font\MT@font@list}Register the current font.2746 \def\MT@register@font{\xdef\MT@font@list{\MT@font@list\MT@font,}}Register the substituted font (only if it isn’t registered already).2747 \def\MT@register@subst@font{\MT@exp@one@n\MT@in@clist\font@name\MT@font@list2748 \ifMT@inlist@\else\xdef\MT@font@list{\MT@font@list\font@name,}\fi}\MT@active@features\MT@check@font@cx\MT@register@subst@font@cx\MT@register@font@cx14.2.10 Context-sensitive setupHere are the variants for context-sensitive setup.The activated features are stored in this command.2749 \let\MT@active@features\@emptyEvery feature has its own list of fonts that have already been dealt with. If thefont needn’t be set up for a feature, we temporarily disable the correspondingsetup command. This should be more efficient than book-keeping the fonts in listsassociated with the combination of contexts, as we’ve done it before.2750 \def\MT@check@font@cx{%2751 \MT@if@true2752 \MT@map@clist@c\MT@active@features{%2753 \expandafter\MT@exp@one@n\expandafter\MT@in@clist\expandafter\MT@font2754 \csname MT@##1@\csname MT@##1@context\endcsname font@list\endcsname2755 \ifMT@inlist@2756 \MT@let@nc{MT@\@nameuse{MT@abbr@##1}}\relax2757 \else2758 \MT@if@false2759 \fi2760 }%2761 \ifMT@if@ \MT@inlist@true \else \MT@inlist@false \fi2762 }Add the substituted font to each feature list.2763 \def\MT@register@subst@font@cx{%2764 \MT@map@clist@c\MT@active@features{%2765 \expandafter\MT@exp@one@n\expandafter\MT@in@clist\expandafter\font@name2766 \csname MT@##1@\csname MT@##1@context\endcsname font@list\endcsname2767 \ifMT@inlist@ \else2768 \MT@exp@cs\MT@xadd2769 {MT@##1@\csname MT@##1@context\endcsname font@list}%2770 {\font@name,}%2771 \fi2772 }%2773 }For each feature, add the current font to the list, unless we didn’t set it up.2774 \def\MT@register@font@cx{%2775 \MT@map@clist@c\MT@active@features{%2776 \MT@exp@cs\ifx{MT@\@nameuse{MT@abbr@##1}}\relax\else