[CWEB] Simplify 'push_level' as well.

git-svn-id: svn://tug.org/texlive/trunk/Build/source@67647 c570f23f-e606-0410-a88d-b1316a301751
TeX-Live · Jul 16, 2023 · b4652be · b4652be
1 parent 76f9780
commit b4652be
Showing 1 changed file with 2 additions and 5 deletions.
diff --git a/texk/web2c/cwebdir/cweave.w b/texk/web2c/cwebdir/cweave.w
@@ -3805,11 +3805,8 @@ push_level( /* suspends the current level */
 text_pointer p)
 {
   if (stack_ptr==stack_end) overflow("stack");
-  if (stack_ptr>stack) { /* save current state */
-    stack_ptr->end_field=cur_end;
-    stack_ptr->tok_field=cur_tok;
-    stack_ptr->mode_field=cur_mode;
-  }
+  if (stack_ptr>stack) /* save current state */
+    *stack_ptr = cur_state;
   stack_ptr++;
   if (stack_ptr>max_stack_ptr) max_stack_ptr=stack_ptr;
   cur_tok=*p; cur_end=*(p+1);