local function rewrite(t) local function handler(old, new) t[old] = t[old] or t[new] if not t[old] then print('!!!', old) end return handler end return handler end rewrite(language) ('clear_hyphenation', 'clearhyphenation') ('clear_patterns', 'clearpatterns') rewrite(node) ('copy_list', 'copylist') ('flush_list', 'flushlist') ('flush_node', 'flushnode') ('get_properties_table', 'getpropertiestable') ('has_field', 'hasfield') ('insert_after', 'insertafter') ('insert_before', 'insertbefore') ('is_node', 'isnode') rewrite(node.direct) ('copy_list', 'copylist') ('effective_glue', 'effectiveglue') ('end_of_math', 'endofmath') ('first_glyph', 'firstglyph') ('flush_list', 'flushlist') ('flush_node', 'flushnode') ('get_attribute', 'getattribute') ('get_properties_table', 'getpropertiestable') ('has_field', 'hasfield') ('has_glyph', 'hasglyph') ('insert_after', 'insertafter') ('insert_before', 'insertbefore') ('is_char', 'ischar') ('is_direct', 'isdirect') ('is_glyph', 'isglyph') ('is_node', 'isnode') ('is_zero_glue', 'iszeroglue') ('last_node', 'lastnode') ('make_extensible', 'makeextensible') ('mlist_to_hlist', 'mlisttohlist') ('protect_glyph', 'protectglyph') ('protect_glyphs', 'protectglyphs') ('traverse_char', 'traversechar') ('traverse_list', 'traverselist') ('traverse_id', 'traverseid') ('unprotect_glyph', 'unprotectglyph') ('unprotect_glyphs', 'unprotectglyphs') ('uses_font', 'usesfont') rewrite(token) ('get_next', 'scannext') ('put_next', 'putnext') ('scan_argument', 'scanargument') ('scan_box', 'scanbox') ('scan_code', 'scancode') ('scan_csname', 'scancsname') ('scan_dimen', 'scandimen') ('scan_float', 'scanfloat') ('scan_glue', 'scanglue') ('scan_int', 'scaninteger') ('scan_keyword', 'scankeyword') ('scan_keywordcs', 'scankeywordcs') ('scan_real', 'scanreal') ('scan_string', 'scanstring') ('scan_token', 'scannextexpanded') ('scan_toks', 'scantoks') ('scan_word', 'scanword') ('set_lua', 'setlua')