diff options
Diffstat (limited to 'source/luametatex/source/lua/lmtinterface.c')
| -rw-r--r-- | source/luametatex/source/lua/lmtinterface.c | 544 |
1 files changed, 544 insertions, 0 deletions
diff --git a/source/luametatex/source/lua/lmtinterface.c b/source/luametatex/source/lua/lmtinterface.c new file mode 100644 index 000000000..1aef54563 --- /dev/null +++ b/source/luametatex/source/lua/lmtinterface.c @@ -0,0 +1,544 @@ +/* + See license.txt in the root of this project. +*/ + +/*tex + + There isn't much here because most happens in the header file. Here we also set up the + environment in which we run, which depends in the operating system used. + +*/ + +# include "luametatex.h" + +lua_state_info lmt_lua_state = { + .lua_instance = NULL, + .used_bytes = 0, + .used_bytes_max = 0, + .function_table_id = 0, + .function_callback_count = 0, + .value_callback_count = 0, + .bytecode_callback_count = 0, + .local_callback_count = 0, + .saved_callback_count = 0, + .file_callback_count = 0, + .direct_callback_count = 0, + .message_callback_count = 0, + .function_table_size = 0, + .bytecode_bytes = 0, + .bytecode_max = 0, + .version_number = (int) LUA_VERSION_NUM, + .release_number = (int) LUA_VERSION_RELEASE_NUM, + .used_buffer = NULL, + .integer_size = sizeof(lua_Integer), +}; + +/*tex + Some more can move here, or we can move some to modules instead. It's a very stepwise + process because things need to keep running. +*/ + +lmt_keys_info lmt_keys; + +lmt_interface_info lmt_interface = { + .pack_type_values = NULL, + .group_code_values = NULL, + .par_context_values = NULL, + .par_begin_values = NULL, + .par_mode_values = NULL, + .math_style_name_values = NULL, + .math_style_variant_values = NULL, + .lua_function_values = NULL, + .direction_values = NULL, + .node_fill_values = NULL, + .page_contribute_values = NULL, + .math_style_values = NULL, + .math_parameter_values = NULL, + .field_type_values = NULL, + .node_data = NULL, + .command_names = NULL, +} ; + +value_info *lmt_aux_allocate_value_info(size_t last) +{ + value_info *v = lmt_memory_calloc(last + 2, sizeof(value_info)); + set_value_entry_nop(v, last + 1); + return v; +} + +void lmt_initialize_interface(void) +{ + lmt_interface.pack_type_values = lmt_aux_allocate_value_info(packing_adapted); + + # define set_pack_type_value(n,k) lmt_interface.pack_type_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_pack_type_value(packing_exactly, exactly); + set_pack_type_value(packing_additional, additional); + set_pack_type_value(packing_expanded, expanded); + set_pack_type_value(packing_substitute, substitute); + set_pack_type_value(packing_adapted, adapted); + + lmt_interface.group_code_values = lmt_aux_allocate_value_info(lua_group); + + # define set_group_code_value(n,k) lmt_interface.group_code_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_group_code_value(bottom_level_group, bottomlevel); + set_group_code_value(simple_group, simple); + set_group_code_value(hbox_group, hbox); + set_group_code_value(adjusted_hbox_group, adjustedhbox); + set_group_code_value(vbox_group, vbox); + set_group_code_value(vtop_group, vtop); + set_group_code_value(align_group, align); + set_group_code_value(no_align_group, noalign); + set_group_code_value(output_group, output); + set_group_code_value(math_group, math); + set_group_code_value(discretionary_group, discretionary); + set_group_code_value(insert_group, insert); + set_group_code_value(vadjust_group, vadjust); + set_group_code_value(vcenter_group, vcenter); + set_group_code_value(math_fraction_group, mathfraction); + set_group_code_value(math_operator_group, mathoperator); + set_group_code_value(math_choice_group, mathchoice); + set_group_code_value(also_simple_group, alsosimple); + set_group_code_value(semi_simple_group, semisimple); + set_group_code_value(math_simple_group, mathsimple); + set_group_code_value(math_shift_group, mathshift); + set_group_code_value(math_fence_group, mathfence); + set_group_code_value(local_box_group, localbox); + set_group_code_value(split_off_group, splitoff); + set_group_code_value(split_keep_group, splitkeep); + set_group_code_value(preamble_group, preamble); + set_group_code_value(align_set_group, alignset); + set_group_code_value(finish_row_group, finishrow); + set_group_code_value(lua_group, lua); + + lmt_interface.par_context_values = lmt_aux_allocate_value_info(reset_par_context); + + # define set_par_context_value(n,k) lmt_interface.par_context_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_par_context_value(normal_par_context, normal); + set_par_context_value(vmode_par_context, vmode); + set_par_context_value(vbox_par_context, vbox); + set_par_context_value(vtop_par_context, vtop); + set_par_context_value(vcenter_par_context, vcenter); + set_par_context_value(vadjust_par_context, vadjust); + set_par_context_value(insert_par_context, insert); + set_par_context_value(output_par_context, output); + set_par_context_value(align_par_context, align); + set_par_context_value(no_align_par_context, noalign); + set_par_context_value(span_par_context, span); + set_par_context_value(reset_par_context, reset); + + lmt_interface.page_context_values = lmt_aux_allocate_value_info(alignment_page_context); + + # define set_page_context_value(n,k) lmt_interface.page_context_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_page_context_value(box_page_context, box); + set_page_context_value(end_page_context, end); + set_page_context_value(vadjust_page_context, vadjust); + set_page_context_value(penalty_page_context, penalty); + set_page_context_value(boundary_page_context, boundary); + set_page_context_value(insert_page_context, insert); + set_page_context_value(hmode_par_page_context, hmodepar); + set_page_context_value(vmode_par_page_context, vmodepar); + set_page_context_value(begin_paragraph_page_context, beginparagraph); + set_page_context_value(before_display_page_context, beforedisplay); + set_page_context_value(after_display_page_context, afterdisplay); + set_page_context_value(after_output_page_context, afteroutput); + set_page_context_value(alignment_page_context, alignment); + + lmt_interface.append_line_context_values = lmt_aux_allocate_value_info(post_migrate_append_line_context); + + # define set_append_line_context_value(n,k) lmt_interface.append_line_context_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_append_line_context_value(box_append_line_context, box); + set_append_line_context_value(pre_box_append_line_context, prebox); + set_append_line_context_value(pre_adjust_append_line_context, preadjust); + set_append_line_context_value(post_adjust_append_line_context, postadjust); + set_append_line_context_value(pre_migrate_append_line_context, premigrate); + set_append_line_context_value(post_migrate_append_line_context, postmigrate); + + lmt_interface.alignment_context_values = lmt_aux_allocate_value_info(wrapup_pass_alignment_context); + + # define set_alignment_context_value(n,k) lmt_interface.alignment_context_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_alignment_context_value(preamble_pass_alignment_context, preamble); + set_alignment_context_value(preroll_pass_alignment_context, preroll); + set_alignment_context_value(package_pass_alignment_context, package); + set_alignment_context_value(wrapup_pass_alignment_context, wrapup); + + lmt_interface.par_begin_values = lmt_aux_allocate_value_info(vrule_char_par_begin); + + # define set_par_begin_value(n,k) lmt_interface.par_begin_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_par_begin_value(normal_par_begin, normal); + set_par_begin_value(force_par_begin, force); + set_par_begin_value(indent_par_begin, indent); + set_par_begin_value(no_indent_par_begin, noindent); + set_par_begin_value(math_char_par_begin, mathchar); + set_par_begin_value(char_par_begin, char); + set_par_begin_value(boundary_par_begin, boundary); + set_par_begin_value(space_par_begin, space); + set_par_begin_value(math_par_begin, math); + set_par_begin_value(kern_par_begin, kern); + set_par_begin_value(hskip_par_begin, hskip); + set_par_begin_value(un_hbox_char_par_begin, unhbox); + set_par_begin_value(valign_char_par_begin, valign); + set_par_begin_value(vrule_char_par_begin, vrule); + + lmt_interface.par_mode_values = lmt_aux_allocate_value_info(math_par_subtype); + + # define set_par_mode_value(n,k) lmt_interface.par_mode_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_par_mode_value(vmode_par_par_subtype, vmodepar); + set_par_mode_value(local_box_par_subtype, localbox); + set_par_mode_value(hmode_par_par_subtype, hmodepar); + set_par_mode_value(penalty_par_subtype, penalty); + set_par_mode_value(math_par_subtype, math); + + lmt_interface.math_style_name_values = lmt_aux_allocate_value_info(cramped_script_script_style); + + # define set_math_style_name_value(n,k) lmt_interface.math_style_name_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_math_style_name_value(display_style, display); + set_math_style_name_value(cramped_display_style, crampeddisplay); + set_math_style_name_value(text_style, text); + set_math_style_name_value(cramped_text_style, crampedtext); + set_math_style_name_value(script_style, script); + set_math_style_name_value(cramped_script_style, crampedscript); + set_math_style_name_value(script_script_style, scriptscript); + set_math_style_name_value(cramped_script_script_style, crampedscriptscript); + + lmt_interface.math_style_variant_values = lmt_aux_allocate_value_info(math_double_superscript_variant); + + # define set_math_style_variant_value(n,k) lmt_interface.math_style_variant_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_math_style_variant_value(math_normal_style_variant, normal); + set_math_style_variant_value(math_cramped_style_variant, cramped); + set_math_style_variant_value(math_subscript_style_variant, subscript); + set_math_style_variant_value(math_superscript_style_variant, superscript); + set_math_style_variant_value(math_small_style_variant, small); + set_math_style_variant_value(math_smaller_style_variant, smaller); + set_math_style_variant_value(math_numerator_style_variant, numerator); + set_math_style_variant_value(math_denominator_style_variant, denominator); + set_math_style_variant_value(math_double_superscript_variant, doublesuperscript); + + lmt_interface.lua_function_values = lmt_aux_allocate_value_info(lua_value_direct_code); + + # define set_lua_function_value(n,k) lmt_interface.lua_function_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_lua_function_value(lua_value_none_code, none); + set_lua_function_value(lua_value_integer_code, integer); + set_lua_function_value(lua_value_cardinal_code, cardinal); + set_lua_function_value(lua_value_dimension_code, dimension); + set_lua_function_value(lua_value_skip_code, skip); + set_lua_function_value(lua_value_boolean_code, boolean); + set_lua_function_value(lua_value_float_code, float); + set_lua_function_value(lua_value_string_code, string); + set_lua_function_value(lua_value_node_code, node); + set_lua_function_value(lua_value_direct_code, direct); + + lmt_interface.direction_values = lmt_aux_allocate_value_info(dir_righttoleft); + + # define set_direction_value(n,k) lmt_interface.direction_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_direction_value(dir_lefttoright, lefttoright); + set_direction_value(dir_righttoleft, righttoleft); + + lmt_interface.field_type_values = lmt_aux_allocate_value_info(attribute_field); + + # define set_field_type_value(n,k) lmt_interface.field_type_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_field_type_value(nil_field, nil); + set_field_type_value(integer_field, integer); + set_field_type_value(dimension_field, dimension); + set_field_type_value(glue_field, glue); + set_field_type_value(number_field, number); + set_field_type_value(string_field, string); + set_field_type_value(boolean_field, boolean); + set_field_type_value(function_field, function); + set_field_type_value(node_field, node); + set_field_type_value(node_list_field, nodelist); + set_field_type_value(token_field, token); + set_field_type_value(token_list_field, tokenlist); + set_field_type_value(attribute_field, attribute); + + lmt_interface.node_fill_values = lmt_aux_allocate_value_info(filll_glue_order); + + # define set_node_fill_value(n,k) lmt_interface.node_fill_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_node_fill_value(normal_glue_order, normal); + set_node_fill_value(fi_glue_order, fi); + set_node_fill_value(fil_glue_order, fil); + set_node_fill_value(fill_glue_order, fill); + set_node_fill_value(filll_glue_order, filll); + + lmt_interface.page_contribute_values = lmt_aux_allocate_value_info(contribute_rule); + + # define set_page_contribute_value(n,k) lmt_interface.page_contribute_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_page_contribute_value(contribute_nothing, empty); + set_page_contribute_value(contribute_insert, insert); + set_page_contribute_value(contribute_box, box); + set_page_contribute_value(contribute_rule, rule); + + lmt_interface.math_style_values = lmt_aux_allocate_value_info(cramped_script_script_style); + + # define set_math_style_value(n,k) lmt_interface.math_style_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_math_style_value(display_style, display); + set_math_style_value(cramped_display_style, crampeddisplay); + set_math_style_value(text_style, text); + set_math_style_value(cramped_text_style, crampedtext); + set_math_style_value(script_style, script); + set_math_style_value(cramped_script_style, crampedscript); + set_math_style_value(script_script_style, scriptscript); + set_math_style_value(cramped_script_script_style, crampedscriptscript); + + lmt_interface.math_indirect_values = lmt_aux_allocate_value_info(last_math_indirect); + + # define set_math_indirect_value(n,k) lmt_interface.math_indirect_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .id = n } + + set_math_indirect_value(indirect_math_unset, unset); + set_math_indirect_value(indirect_math_regular, regular); + set_math_indirect_value(indirect_math_integer, integer); + set_math_indirect_value(indirect_math_dimension, dimension); + set_math_indirect_value(indirect_math_gluespec, gluespec); + set_math_indirect_value(indirect_math_mugluespec, mugluespec); + set_math_indirect_value(indirect_math_register_integer, registerinteger); + set_math_indirect_value(indirect_math_register_dimension, registerdimension); + set_math_indirect_value(indirect_math_register_gluespec, registergluespec); + set_math_indirect_value(indirect_math_register_mugluespec, registermugluespec); + set_math_indirect_value(indirect_math_internal_integer, internalinteger); + set_math_indirect_value(indirect_math_internal_dimension, internaldimension); + set_math_indirect_value(indirect_math_internal_dimension, internalgluespec); + set_math_indirect_value(indirect_math_internal_mugluespec, internalmugluespec); + + lmt_interface.math_parameter_values = lmt_aux_allocate_value_info(last_math_parameter); + + # define set_math_parameter_value(n,t,k) lmt_interface.math_parameter_values[n] = (value_info) { .lua = lua_key_index(k), .name = lua_key(k), .type = t } + + set_math_parameter_value(math_parameter_quad, math_dimen_parameter, quad); + set_math_parameter_value(math_parameter_axis, math_dimen_parameter, axis); + set_math_parameter_value(math_parameter_accent_base_height, math_dimen_parameter, accentbaseheight); + set_math_parameter_value(math_parameter_accent_base_depth, math_dimen_parameter, accentbasedepth); + set_math_parameter_value(math_parameter_flattened_accent_base_height, math_dimen_parameter, flattenedaccentbaseheight); + set_math_parameter_value(math_parameter_flattened_accent_base_depth, math_dimen_parameter, flattenedaccentbasedepth); + set_math_parameter_value(math_parameter_x_scale, math_int_parameter, xscale); + set_math_parameter_value(math_parameter_y_scale, math_int_parameter, yscale); + set_math_parameter_value(math_parameter_operator_size, math_dimen_parameter, operatorsize); + set_math_parameter_value(math_parameter_overbar_kern, math_dimen_parameter, overbarkern); + set_math_parameter_value(math_parameter_overbar_rule, math_dimen_parameter, overbarrule); + set_math_parameter_value(math_parameter_overbar_vgap, math_dimen_parameter, overbarvgap); + set_math_parameter_value(math_parameter_underbar_kern, math_dimen_parameter, underbarkern); + set_math_parameter_value(math_parameter_underbar_rule, math_dimen_parameter, underbarrule); + set_math_parameter_value(math_parameter_underbar_vgap, math_dimen_parameter, underbarvgap); + set_math_parameter_value(math_parameter_radical_kern, math_dimen_parameter, radicalkern); + set_math_parameter_value(math_parameter_radical_rule, math_dimen_parameter, radicalrule); + set_math_parameter_value(math_parameter_radical_vgap, math_dimen_parameter, radicalvgap); + set_math_parameter_value(math_parameter_radical_degree_before, math_dimen_parameter, radicaldegreebefore); + set_math_parameter_value(math_parameter_radical_degree_after, math_dimen_parameter, radicaldegreeafter); + set_math_parameter_value(math_parameter_radical_degree_raise, math_int_parameter, radicaldegreeraise); + set_math_parameter_value(math_parameter_radical_extensible_after, math_dimen_parameter, radicalextensibleafter); + set_math_parameter_value(math_parameter_radical_extensible_before, math_dimen_parameter, radicalextensiblebefore); + set_math_parameter_value(math_parameter_stack_vgap, math_dimen_parameter, stackvgap); + set_math_parameter_value(math_parameter_stack_num_up, math_dimen_parameter, stacknumup); + set_math_parameter_value(math_parameter_stack_denom_down, math_dimen_parameter, stackdenomdown); + set_math_parameter_value(math_parameter_fraction_rule, math_dimen_parameter, fractionrule); + set_math_parameter_value(math_parameter_fraction_num_vgap, math_dimen_parameter, fractionnumvgap); + set_math_parameter_value(math_parameter_fraction_num_up, math_dimen_parameter, fractionnumup); + set_math_parameter_value(math_parameter_fraction_denom_vgap, math_dimen_parameter, fractiondenomvgap); + set_math_parameter_value(math_parameter_fraction_denom_down, math_dimen_parameter, fractiondenomdown); + set_math_parameter_value(math_parameter_fraction_del_size, math_dimen_parameter, fractiondelsize); + set_math_parameter_value(math_parameter_skewed_fraction_hgap, math_dimen_parameter, skewedfractionhgap); + set_math_parameter_value(math_parameter_skewed_fraction_vgap, math_dimen_parameter, skewedfractionvgap); + set_math_parameter_value(math_parameter_limit_above_vgap, math_dimen_parameter, limitabovevgap); + set_math_parameter_value(math_parameter_limit_above_bgap, math_dimen_parameter, limitabovebgap); + set_math_parameter_value(math_parameter_limit_above_kern, math_dimen_parameter, limitabovekern); + set_math_parameter_value(math_parameter_limit_below_vgap, math_dimen_parameter, limitbelowvgap); + set_math_parameter_value(math_parameter_limit_below_bgap, math_dimen_parameter, limitbelowbgap); + set_math_parameter_value(math_parameter_limit_below_kern, math_dimen_parameter, limitbelowkern); + set_math_parameter_value(math_parameter_nolimit_sup_factor, math_dimen_parameter, nolimitsupfactor); + set_math_parameter_value(math_parameter_nolimit_sub_factor, math_dimen_parameter, nolimitsubfactor); + set_math_parameter_value(math_parameter_under_delimiter_vgap, math_dimen_parameter, underdelimitervgap); + set_math_parameter_value(math_parameter_under_delimiter_bgap, math_dimen_parameter, underdelimiterbgap); + set_math_parameter_value(math_parameter_over_delimiter_vgap, math_dimen_parameter, overdelimitervgap); + set_math_parameter_value(math_parameter_over_delimiter_bgap, math_dimen_parameter, overdelimiterbgap); + set_math_parameter_value(math_parameter_subscript_shift_drop, math_dimen_parameter, subshiftdrop); + set_math_parameter_value(math_parameter_superscript_shift_drop, math_dimen_parameter, supshiftdrop); + set_math_parameter_value(math_parameter_subscript_shift_down, math_dimen_parameter, subshiftdown); + set_math_parameter_value(math_parameter_subscript_superscript_shift_down, math_dimen_parameter, subsupshiftdown); + set_math_parameter_value(math_parameter_subscript_top_max, math_dimen_parameter, subtopmax); + set_math_parameter_value(math_parameter_superscript_shift_up, math_dimen_parameter, supshiftup); + set_math_parameter_value(math_parameter_superscript_bottom_min, math_dimen_parameter, supbottommin); + set_math_parameter_value(math_parameter_superscript_subscript_bottom_max, math_dimen_parameter, supsubbottommax); + set_math_parameter_value(math_parameter_subscript_superscript_vgap, math_dimen_parameter, subsupvgap); + set_math_parameter_value(math_parameter_space_before_script, math_dimen_parameter, spacebeforescript); + set_math_parameter_value(math_parameter_space_after_script, math_dimen_parameter, spaceafterscript); + set_math_parameter_value(math_parameter_connector_overlap_min, math_dimen_parameter, connectoroverlapmin); + + /*tex + + Gone are the many: + + \starttyping + set_math_parameter_value(math_parameter_ordinary_ordinary_spacing, math_muglue_parameter, ordordspacing); + \stoptyping + + thanks to the more generic multiple class mechanism. + + */ + + set_math_parameter_value(math_parameter_extra_superscript_shift, math_dimen_parameter, extrasuperscriptshift); + set_math_parameter_value(math_parameter_extra_subscript_shift, math_dimen_parameter, extrasubscriptshift); + set_math_parameter_value(math_parameter_extra_superprescript_shift, math_dimen_parameter, extrasuperprescriptshift); + set_math_parameter_value(math_parameter_extra_subprescript_shift, math_dimen_parameter, extrasubprescriptshift); + + set_math_parameter_value(math_parameter_prime_raise, math_int_parameter, primeraise); + set_math_parameter_value(math_parameter_prime_raise_composed, math_int_parameter, primeraisecomposed); + set_math_parameter_value(math_parameter_prime_shift_up, math_dimen_parameter, primeshiftup); + set_math_parameter_value(math_parameter_prime_shift_drop, math_dimen_parameter, primeshiftdrop); + set_math_parameter_value(math_parameter_prime_space_after, math_dimen_parameter, primespaceafter); + set_math_parameter_value(math_parameter_prime_width, math_int_parameter, primewidth); + + set_math_parameter_value(math_parameter_rule_height, math_dimen_parameter, ruleheight); + set_math_parameter_value(math_parameter_rule_depth, math_dimen_parameter, ruledepth); + + set_math_parameter_value(math_parameter_superscript_shift_distance, math_dimen_parameter, superscriptshiftdistance); + set_math_parameter_value(math_parameter_subscript_shift_distance, math_dimen_parameter, subscriptshiftdistance); + set_math_parameter_value(math_parameter_superprescript_shift_distance, math_dimen_parameter, presuperscriptshiftdistance); + set_math_parameter_value(math_parameter_subprescript_shift_distance, math_dimen_parameter, presubscriptshiftdistance); + + set_math_parameter_value(math_parameter_extra_superscript_space, math_dimen_parameter, extrasuperscriptspace); + set_math_parameter_value(math_parameter_extra_subscript_space, math_dimen_parameter, extrasubscriptspace); + set_math_parameter_value(math_parameter_extra_superprescript_space, math_dimen_parameter, extrasuperprescriptspace); + set_math_parameter_value(math_parameter_extra_subprescript_space, math_dimen_parameter, extrasubprescriptspace); + + set_math_parameter_value(math_parameter_skewed_delimiter_tolerance, math_dimen_parameter, skeweddelimitertolerance); + + set_math_parameter_value(math_parameter_accent_top_shift_up, math_dimen_parameter, accenttopshiftup); + set_math_parameter_value(math_parameter_accent_bottom_shift_down, math_dimen_parameter, accentbottomshiftdown); + set_math_parameter_value(math_parameter_accent_top_overshoot, math_int_parameter, accenttopovershoot); + set_math_parameter_value(math_parameter_accent_bottom_overshoot, math_int_parameter, accentbottomovershoot); + set_math_parameter_value(math_parameter_accent_superscript_drop, math_dimen_parameter, accentsuperscriptdrop); + set_math_parameter_value(math_parameter_accent_superscript_percent, math_int_parameter, accentsuperscriptpercent); + set_math_parameter_value(math_parameter_accent_extend_margin, math_int_parameter, accentextendmargin); + set_math_parameter_value(math_parameter_flattened_accent_top_shift_up, math_dimen_parameter, flattenedaccenttopshiftup); + set_math_parameter_value(math_parameter_flattened_accent_bottom_shift_down, math_dimen_parameter, flattenedaccentbottomshiftdown); + + set_math_parameter_value(math_parameter_delimiter_percent, math_int_parameter, delimiterpercent); + set_math_parameter_value(math_parameter_delimiter_shortfall, math_dimen_parameter, delimitershortfall); + + set_math_parameter_value(math_parameter_over_line_variant, math_style_parameter, overlinevariant); + set_math_parameter_value(math_parameter_under_line_variant, math_style_parameter, underlinevariant); + set_math_parameter_value(math_parameter_over_delimiter_variant, math_style_parameter, overdelimitervariant); + set_math_parameter_value(math_parameter_under_delimiter_variant, math_style_parameter, underdelimitervariant); + set_math_parameter_value(math_parameter_delimiter_over_variant, math_style_parameter, delimiterovervariant); + set_math_parameter_value(math_parameter_delimiter_under_variant, math_style_parameter, delimiterundervariant); + set_math_parameter_value(math_parameter_h_extensible_variant, math_style_parameter, hextensiblevariant); + set_math_parameter_value(math_parameter_v_extensible_variant, math_style_parameter, vextensiblevariant); + set_math_parameter_value(math_parameter_fraction_variant, math_style_parameter, fractionvariant); + set_math_parameter_value(math_parameter_radical_variant, math_style_parameter, radicalvariant); + set_math_parameter_value(math_parameter_degree_variant, math_style_parameter, degreevariant); + set_math_parameter_value(math_parameter_accent_variant, math_style_parameter, accentvariant); + set_math_parameter_value(math_parameter_top_accent_variant, math_style_parameter, topaccentvariant); + set_math_parameter_value(math_parameter_bottom_accent_variant, math_style_parameter, bottomaccentvariant); + set_math_parameter_value(math_parameter_overlay_accent_variant, math_style_parameter, overlayaccentvariant); + set_math_parameter_value(math_parameter_numerator_variant, math_style_parameter, numeratorvariant); + set_math_parameter_value(math_parameter_denominator_variant, math_style_parameter, denominatorvariant); + set_math_parameter_value(math_parameter_superscript_variant, math_style_parameter, superscriptvariant); + set_math_parameter_value(math_parameter_subscript_variant, math_style_parameter, subscriptvariant); + set_math_parameter_value(math_parameter_prime_variant, math_style_parameter, primevariant); + set_math_parameter_value(math_parameter_stack_variant, math_style_parameter, stackvariant); + + lmt_interface.math_font_parameter_values = lmt_aux_allocate_value_info(math_parameter_last_code + 1); + + # define set_math_font_parameter(n, t) lmt_interface.math_font_parameter_values[n] = (value_info) { .lua = lua_key_index(n), .name = lua_key(n), .type = t } + + set_math_font_parameter(ScriptPercentScaleDown, math_int_parameter); + set_math_font_parameter(ScriptScriptPercentScaleDown, math_int_parameter); + set_math_font_parameter(DelimitedSubFormulaMinHeight, math_dimen_parameter); + set_math_font_parameter(DisplayOperatorMinHeight, math_dimen_parameter); + set_math_font_parameter(MathLeading, math_dimen_parameter); + set_math_font_parameter(AxisHeight, math_dimen_parameter); + set_math_font_parameter(AccentBaseHeight, math_dimen_parameter); + set_math_font_parameter(AccentBaseDepth, math_dimen_parameter); + set_math_font_parameter(FlattenedAccentBaseHeight, math_dimen_parameter); + set_math_font_parameter(FlattenedAccentBaseDepth, math_dimen_parameter); + set_math_font_parameter(SubscriptShiftDown, math_dimen_parameter); + set_math_font_parameter(SubscriptTopMax, math_dimen_parameter); + set_math_font_parameter(SubscriptBaselineDropMin, math_dimen_parameter); + set_math_font_parameter(SuperscriptShiftUp, math_dimen_parameter); + set_math_font_parameter(SuperscriptShiftUpCramped, math_dimen_parameter); + set_math_font_parameter(SuperscriptBottomMin, math_dimen_parameter); + set_math_font_parameter(SuperscriptBaselineDropMax, math_dimen_parameter); + set_math_font_parameter(SubSuperscriptGapMin, math_dimen_parameter); + set_math_font_parameter(SuperscriptBottomMaxWithSubscript, math_dimen_parameter); + set_math_font_parameter(SpaceBeforeScript, math_dimen_parameter); + set_math_font_parameter(SpaceAfterScript, math_dimen_parameter); + set_math_font_parameter(UpperLimitGapMin, math_dimen_parameter); + set_math_font_parameter(UpperLimitBaselineRiseMin, math_dimen_parameter); + set_math_font_parameter(LowerLimitGapMin, math_dimen_parameter); + set_math_font_parameter(LowerLimitBaselineDropMin, math_dimen_parameter); + set_math_font_parameter(StackTopShiftUp, math_dimen_parameter); + set_math_font_parameter(StackTopDisplayStyleShiftUp, math_dimen_parameter); + set_math_font_parameter(StackBottomShiftDown, math_dimen_parameter); + set_math_font_parameter(StackBottomDisplayStyleShiftDown, math_dimen_parameter); + set_math_font_parameter(StackGapMin, math_dimen_parameter); + set_math_font_parameter(StackDisplayStyleGapMin, math_dimen_parameter); + set_math_font_parameter(StretchStackTopShiftUp, math_dimen_parameter); + set_math_font_parameter(StretchStackBottomShiftDown, math_dimen_parameter); + set_math_font_parameter(StretchStackGapAboveMin, math_dimen_parameter); + set_math_font_parameter(StretchStackGapBelowMin, math_dimen_parameter); + set_math_font_parameter(FractionNumeratorShiftUp, math_dimen_parameter); + set_math_font_parameter(FractionNumeratorDisplayStyleShiftUp, math_dimen_parameter); + set_math_font_parameter(FractionDenominatorShiftDown, math_dimen_parameter); + set_math_font_parameter(FractionDenominatorDisplayStyleShiftDown, math_dimen_parameter); + set_math_font_parameter(FractionNumeratorGapMin, math_dimen_parameter); + set_math_font_parameter(FractionNumeratorDisplayStyleGapMin, math_dimen_parameter); + set_math_font_parameter(FractionRuleThickness, math_dimen_parameter); + set_math_font_parameter(FractionDenominatorGapMin, math_dimen_parameter); + set_math_font_parameter(FractionDenominatorDisplayStyleGapMin, math_dimen_parameter); + set_math_font_parameter(SkewedFractionHorizontalGap, math_dimen_parameter); + set_math_font_parameter(SkewedFractionVerticalGap, math_dimen_parameter); + set_math_font_parameter(OverbarVerticalGap, math_dimen_parameter); + set_math_font_parameter(OverbarRuleThickness, math_dimen_parameter); + set_math_font_parameter(OverbarExtraAscender, math_dimen_parameter); + set_math_font_parameter(UnderbarVerticalGap, math_dimen_parameter); + set_math_font_parameter(UnderbarRuleThickness, math_dimen_parameter); + set_math_font_parameter(UnderbarExtraDescender, math_dimen_parameter); + set_math_font_parameter(RadicalVerticalGap, math_dimen_parameter); + set_math_font_parameter(RadicalDisplayStyleVerticalGap, math_dimen_parameter); + set_math_font_parameter(RadicalRuleThickness, math_dimen_parameter); + set_math_font_parameter(RadicalExtraAscender, math_dimen_parameter); + set_math_font_parameter(RadicalKernBeforeDegree, math_dimen_parameter); + set_math_font_parameter(RadicalKernAfterDegree, math_dimen_parameter); + set_math_font_parameter(RadicalDegreeBottomRaisePercent, math_int_parameter); + set_math_font_parameter(RadicalKernAfterExtensible, math_dimen_parameter); + set_math_font_parameter(RadicalKernBeforeExtensible, math_dimen_parameter); + set_math_font_parameter(MinConnectorOverlap, math_dimen_parameter); + set_math_font_parameter(SubscriptShiftDownWithSuperscript, math_dimen_parameter); + set_math_font_parameter(FractionDelimiterSize, math_dimen_parameter); + set_math_font_parameter(FractionDelimiterDisplayStyleSize, math_dimen_parameter); + set_math_font_parameter(NoLimitSubFactor, math_int_parameter); + set_math_font_parameter(NoLimitSupFactor, math_int_parameter); + set_math_font_parameter(PrimeRaisePercent, math_int_parameter); + set_math_font_parameter(PrimeRaiseComposedPercent, math_int_parameter); + set_math_font_parameter(PrimeShiftUp, math_dimen_parameter); + set_math_font_parameter(PrimeShiftUpCramped, math_dimen_parameter); + set_math_font_parameter(PrimeBaselineDropMax, math_dimen_parameter); + set_math_font_parameter(PrimeSpaceAfter, math_dimen_parameter); + set_math_font_parameter(PrimeWidthPercent, math_int_parameter); + set_math_font_parameter(SkewedDelimiterTolerance, math_dimen_parameter); + set_math_font_parameter(AccentTopShiftUp, math_dimen_parameter); + set_math_font_parameter(AccentBottomShiftDown, math_dimen_parameter); + set_math_font_parameter(AccentTopOvershoot, math_int_parameter); + set_math_font_parameter(AccentBottomOvershoot, math_int_parameter); + set_math_font_parameter(AccentSuperscriptDrop, math_dimen_parameter); + set_math_font_parameter(AccentSuperscriptPercent, math_int_parameter); + set_math_font_parameter(AccentExtendMargin, math_dimen_parameter); + set_math_font_parameter(FlattenedAccentTopShiftUp, math_dimen_parameter); + set_math_font_parameter(FlattenedAccentBottomShiftDown, math_dimen_parameter); + set_math_font_parameter(DelimiterPercent, math_int_parameter); + set_math_font_parameter(DelimiterShortfall, math_dimen_parameter); +} |