summaryrefslogtreecommitdiff
path: root/Build/source
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source')
-rw-r--r--Build/source/texk/web2c/luatexdir/luatex_svnversion.h2
-rw-r--r--Build/source/texk/web2c/mplibdir/mp.w16
2 files changed, 8 insertions, 10 deletions
diff --git a/Build/source/texk/web2c/luatexdir/luatex_svnversion.h b/Build/source/texk/web2c/luatexdir/luatex_svnversion.h
index 883b2d562f3..b40380e1055 100644
--- a/Build/source/texk/web2c/luatexdir/luatex_svnversion.h
+++ b/Build/source/texk/web2c/luatexdir/luatex_svnversion.h
@@ -1 +1 @@
-#define luatex_svn_revision 7438
+#define luatex_svn_revision 7439
diff --git a/Build/source/texk/web2c/mplibdir/mp.w b/Build/source/texk/web2c/mplibdir/mp.w
index acb64feed7f..469218c692b 100644
--- a/Build/source/texk/web2c/mplibdir/mp.w
+++ b/Build/source/texk/web2c/mplibdir/mp.w
@@ -18136,15 +18136,13 @@ new level (having, initially, the same properties as the old).
@d push_input { /* enter a new input level, save the old */
if ( mp->input_ptr>mp->max_in_stack ) {
mp->max_in_stack=mp->input_ptr;
- /* The mp->stack_size < 1001 condition is necessary to prevent stack overflow due infinite recursion. */
- if ( mp->input_ptr==mp->stack_size && mp->stack_size < 1001) {
- int l = (mp->stack_size+(mp->stack_size/4));
- XREALLOC(mp->input_stack, l, in_state_record);
- mp->stack_size = l;
- } else {
- fprintf(stderr, "input stack overflow\n");
- exit(EXIT_FAILURE);
- }
+ if ( mp->input_ptr==mp->stack_size ) {
+ int l = (mp->stack_size+(mp->stack_size/4));
+ /* The mp->stack_size < 1001 condition is necessary to prevent C stack overflow due infinite recursion. */
+ if (l>1000) {fprintf(stderr, "input stack overflow\n");exit(EXIT_FAILURE);}
+ XREALLOC(mp->input_stack, l, in_state_record);
+ mp->stack_size = l;
+ }
}
mp->input_stack[mp->input_ptr]=mp->cur_input; /* stack the record */
incr(mp->input_ptr);