summaryrefslogtreecommitdiff
path: root/source/luametatex/source/lua
diff options
context:
space:
mode:
Diffstat (limited to 'source/luametatex/source/lua')
-rw-r--r--source/luametatex/source/lua/lmtinterface.c2
-rw-r--r--source/luametatex/source/lua/lmtinterface.h5
-rw-r--r--source/luametatex/source/lua/lmtnodelib.c8
-rw-r--r--source/luametatex/source/lua/lmttexlib.c42
4 files changed, 39 insertions, 18 deletions
diff --git a/source/luametatex/source/lua/lmtinterface.c b/source/luametatex/source/lua/lmtinterface.c
index 9156f0aaf..2c94feb6f 100644
--- a/source/luametatex/source/lua/lmtinterface.c
+++ b/source/luametatex/source/lua/lmtinterface.c
@@ -435,6 +435,7 @@ void lmt_initialize_interface(void)
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_delimiter_extend_margin, math_dimen_parameter, delimiterextendmargin);
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);
@@ -548,4 +549,5 @@ void lmt_initialize_interface(void)
set_math_font_parameter(FlattenedAccentBottomShiftDown, math_dimen_parameter);
set_math_font_parameter(DelimiterPercent, math_int_parameter);
set_math_font_parameter(DelimiterShortfall, math_dimen_parameter);
+ set_math_font_parameter(DelimiterExtendMargin, math_dimen_parameter);
}
diff --git a/source/luametatex/source/lua/lmtinterface.h b/source/luametatex/source/lua/lmtinterface.h
index 59ef808c8..26481d075 100644
--- a/source/luametatex/source/lua/lmtinterface.h
+++ b/source/luametatex/source/lua/lmtinterface.h
@@ -560,6 +560,7 @@ make_lua_key(L, data);\
make_lua_key(L, deep_frozen_cs_dont_expand);\
make_lua_key(L, deep_frozen_cs_end_template);\
make_lua_key(L, def);\
+make_lua_key(L, deferred);\
make_lua_key(L, define_char_code);\
make_lua_key(L, define_family);\
make_lua_key(L, define_font);\
@@ -572,6 +573,8 @@ make_lua_key(L, delimiter);\
make_lua_key(L, delimiter_number);\
make_lua_key(L, delimiterover);\
make_lua_key(L, delimiterovervariant);\
+make_lua_key(L, DelimiterExtendMargin);\
+make_lua_key(L, delimiterextendmargin);\
make_lua_key(L, DelimiterPercent);\
make_lua_key(L, delimiterpercent);\
make_lua_key(L, DelimiterShortfall);\
@@ -749,6 +752,7 @@ make_lua_key(L, indentskip);\
make_lua_key(L, index);\
make_lua_key(L, info);\
make_lua_key(L, Info);\
+make_lua_key(L, inherited);\
make_lua_key(L, inner);\
make_lua_key(L, innerlocation);\
make_lua_key(L, innerxoffset);\
@@ -1126,6 +1130,7 @@ make_lua_key(L, ScriptScriptPercentScaleDown);\
make_lua_key(L, scriptscriptscale);\
make_lua_key(L, second);\
make_lua_key(L, semisimple);\
+make_lua_key(L, semiprotected);\
make_lua_key(L, set);\
make_lua_key(L, set_auxiliary);\
make_lua_key(L, set_box);\
diff --git a/source/luametatex/source/lua/lmtnodelib.c b/source/luametatex/source/lua/lmtnodelib.c
index 72b9918e4..997115267 100644
--- a/source/luametatex/source/lua/lmtnodelib.c
+++ b/source/luametatex/source/lua/lmtnodelib.c
@@ -6763,6 +6763,10 @@ static int nodelib_common_getfield(lua_State *L, int direct, halfword n)
nodelib_push_direct_or_node(L, direct, radical_left_delimiter(n));
} else if (lua_key_eq(s, right)) {
nodelib_push_direct_or_node(L, direct, radical_right_delimiter(n));
+ } else if (lua_key_eq(s, top)) {
+ nodelib_push_direct_or_node(L, direct, radical_top_delimiter(n));
+ } else if (lua_key_eq(s, bottom)) {
+ nodelib_push_direct_or_node(L, direct, radical_bottom_delimiter(n));
} else if (lua_key_eq(s, degree)) {
nodelib_push_direct_or_node(L, direct, radical_degree(n));
} else if (lua_key_eq(s, width)) {
@@ -7436,6 +7440,10 @@ static int nodelib_common_setfield(lua_State *L, int direct, halfword n)
radical_left_delimiter(n) = nodelib_direct_or_node_from_index(L, direct, 3);
} else if (lua_key_eq(s, right)) {
radical_right_delimiter(n) = nodelib_direct_or_node_from_index(L, direct, 3);
+ } else if (lua_key_eq(s, top)) {
+ radical_top_delimiter(n) = nodelib_direct_or_node_from_index(L, direct, 3);
+ } else if (lua_key_eq(s, bottom)) {
+ radical_bottom_delimiter(n) = nodelib_direct_or_node_from_index(L, direct, 3);
} else if (lua_key_eq(s, degree)) {
radical_degree(n) = nodelib_direct_or_node_from_index(L, direct, 3);
} else if (lua_key_eq(s, width)) {
diff --git a/source/luametatex/source/lua/lmttexlib.c b/source/luametatex/source/lua/lmttexlib.c
index 0afd6cdf6..38c8e3fa8 100644
--- a/source/luametatex/source/lua/lmttexlib.c
+++ b/source/luametatex/source/lua/lmttexlib.c
@@ -4928,23 +4928,28 @@ static int texlib_getautomigrationvalues(lua_State *L)
static int texlib_getflagvalues(lua_State *L)
{
- lua_createtable(L, 2, 15);
- lua_push_key_at_index(L, frozen, frozen_flag_bit);
- lua_push_key_at_index(L, permanent, permanent_flag_bit);
- lua_push_key_at_index(L, immutable, immutable_flag_bit);
- lua_push_key_at_index(L, primitive, primitive_flag_bit);
- lua_push_key_at_index(L, mutable, mutable_flag_bit);
- lua_push_key_at_index(L, noaligned, noaligned_flag_bit);
- lua_push_key_at_index(L, instance, instance_flag_bit);
- lua_push_key_at_index(L, untraced, untraced_flag_bit);
- lua_push_key_at_index(L, global, global_flag_bit);
- lua_push_key_at_index(L, tolerant, tolerant_flag_bit);
- lua_push_key_at_index(L, protected, protected_flag_bit);
- lua_push_key_at_index(L, overloaded, overloaded_flag_bit);
- lua_push_key_at_index(L, aliased, aliased_flag_bit);
- lua_push_key_at_index(L, immediate, immediate_flag_bit);
- lua_push_key_at_index(L, conditional, conditional_flag_bit);
- lua_push_key_at_index(L, value, value_flag_bit);
+ lua_createtable(L, 2, 18);
+ /* what about the rest */
+ lua_push_key_at_index(L, frozen, frozen_flag_bit);
+ lua_push_key_at_index(L, permanent, permanent_flag_bit);
+ lua_push_key_at_index(L, immutable, immutable_flag_bit);
+ lua_push_key_at_index(L, primitive, primitive_flag_bit);
+ lua_push_key_at_index(L, mutable, mutable_flag_bit);
+ lua_push_key_at_index(L, noaligned, noaligned_flag_bit);
+ lua_push_key_at_index(L, instance, instance_flag_bit);
+ lua_push_key_at_index(L, untraced, untraced_flag_bit);
+ lua_push_key_at_index(L, global, global_flag_bit);
+ lua_push_key_at_index(L, tolerant, tolerant_flag_bit);
+ lua_push_key_at_index(L, protected, protected_flag_bit);
+ lua_push_key_at_index(L, overloaded, overloaded_flag_bit);
+ lua_push_key_at_index(L, aliased, aliased_flag_bit);
+ lua_push_key_at_index(L, immediate, immediate_flag_bit);
+ lua_push_key_at_index(L, conditional, conditional_flag_bit);
+ lua_push_key_at_index(L, value, value_flag_bit);
+ lua_push_key_at_index(L, semiprotected, semiprotected_flag_bit);
+ lua_push_key_at_index(L, inherited, inherited_flag_bit);
+ lua_push_key_at_index(L, constant, constant_flag_bit);
+ lua_push_key_at_index(L, deferred, deferred_flag_bit);
return 1;
}
@@ -5240,7 +5245,7 @@ static int texlib_getdiscstatevalues(lua_State *L)
static int texlib_getmathcontrolvalues(lua_State *L)
{
- lua_createtable(L, 2, 23);
+ lua_createtable(L, 2, 24);
lua_set_string_by_index(L, math_control_use_font_control, "usefontcontrol");
lua_set_string_by_index(L, math_control_over_rule, "overrule");
lua_set_string_by_index(L, math_control_under_rule, "underrule");
@@ -5266,6 +5271,7 @@ static int texlib_getmathcontrolvalues(lua_State *L)
lua_set_string_by_index(L, math_control_ignore_kern_dimensions, "ignorekerndimensions");
lua_set_string_by_index(L, math_control_ignore_flat_accents, "ignoreflataccents");
lua_set_string_by_index(L, math_control_extend_accents, "extendaccents");
+ lua_set_string_by_index(L, math_control_extend_delimiters, "extenddelimiters");
return 1;
}