summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/musictex/musicsix.tex
blob: a61bc298eb4d1d2a25aa61114e23e93fad73d432 (plain)
1
2
3
4
5
6
7
8
9
10
11
% This file facilitates compilation of some musixtex features.
% Version 5.13

\newtoks\t@c
\def\@fourtoks#1#2#3#4#5+{#1#2#3#4}

\def\setclef#1#2{\noinstrum@nt#1\relax \s@l@ctclefs \t@c{#2000}%
  \cleftoks\expandafter\expandafter\expandafter{\expandafter\@fourtoks\the\t@c+}}
 \let\setclefs\setclef

\endinput