%\starttext
aa
\directlua{
function mydeffont(n,s,i)
print("here: " .. n .. ' ' .. s .. ' ' .. i)
f=font.read_tfm(n,s)
for ii,vv in font.each() do
if (n == vv.name) then
print('n: ' .. ' ' .. (vv.name or '?') .. ' ' ..(s or 'size') .. ' ' ..(vv.size or 'size2') )
end
end
return f
end
callback.register('define_font',mydeffont)
}
\font\a=cmss10
\font\b=cmbx10
\font\c=cmbx10
\immediate\write16{a: \number\fontid\a}
\immediate\write16{b: \number\fontid\b}
\immediate\write16{c: \number\fontid\c}