texlive[62172] Build/source/texk/web2c/hitexdir: HiTeX: fixing

[commits+mruckert at tug.org]

Revision: 62172
          http://tug.org/svn/texlive?view=revision&revision=62172
Author:   mruckert
Date:     2022-02-25 14:43:37 +0100 (Fri, 25 Feb 2022)
Log Message:
-----------
HiTeX: fixing basineskips after images

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/hitexdir/hiformat.hnt
    trunk/Build/source/texk/web2c/hitexdir/hiformat.pdf
    trunk/Build/source/texk/web2c/hitexdir/hiformat.w
    trunk/Build/source/texk/web2c/hitexdir/hintview/src/main.c
    trunk/Build/source/texk/web2c/hitexdir/hiparser.h
    trunk/Build/source/texk/web2c/hitexdir/hitex.w

Added Paths:
-----------
    trunk/Build/source/texk/web2c/hitexdir/tex/hiltxpage.tex

Modified: trunk/Build/source/texk/web2c/hitexdir/hiformat.hnt
===================================================================
(Binary files differ)

Modified: trunk/Build/source/texk/web2c/hitexdir/hiformat.pdf
===================================================================
(Binary files differ)

Modified: trunk/Build/source/texk/web2c/hitexdir/hiformat.w
===================================================================
--- trunk/Build/source/texk/web2c/hitexdir/hiformat.w	2022-02-25 00:48:48 UTC (rev 62171)
+++ trunk/Build/source/texk/web2c/hitexdir/hiformat.w	2022-02-25 13:43:37 UTC (rev 62172)
@@ -47,9 +47,9 @@
 
 
 \def\setrevision$#1: #2 ${\gdef\lastrevision{#2}}
-\setrevision$Revision: 2696 $
+\setrevision$Revision: 2699 $
 \def\setdate$#1(#2) ${\gdef\lastdate{#2}}
-\setdate$Date: 2022-02-24 10:59:11 +0100 (Thu, 24 Feb 2022) $
+\setdate$Date: 2022-02-25 10:21:04 +0100 (Fri, 25 Feb 2022) $
 
 \null
 

Modified: trunk/Build/source/texk/web2c/hitexdir/hintview/src/main.c
===================================================================
--- trunk/Build/source/texk/web2c/hitexdir/hintview/src/main.c	2022-02-25 00:48:48 UTC (rev 62171)
+++ trunk/Build/source/texk/web2c/hitexdir/hintview/src/main.c	2022-02-25 13:43:37 UTC (rev 62172)
@@ -39,7 +39,7 @@
 #include <GLFW/glfw3.h>
 
 #define VERSION 1
-#define REVISION 0
+#define REVISION 3
 #define PATCHLEVEL 0
 
 #if 0

Modified: trunk/Build/source/texk/web2c/hitexdir/hiparser.h
===================================================================
--- trunk/Build/source/texk/web2c/hitexdir/hiparser.h	2022-02-25 00:48:48 UTC (rev 62171)
+++ trunk/Build/source/texk/web2c/hitexdir/hiparser.h	2022-02-25 13:43:37 UTC (rev 62172)
@@ -39,7 +39,7 @@
 # define YY_YY_PARSER_H_INCLUDED
 /* Debug traces.  */
 #ifndef YYDEBUG
-# define YYDEBUG 1
+# define YYDEBUG 0
 #endif
 #if YYDEBUG
 extern int yydebug;

Modified: trunk/Build/source/texk/web2c/hitexdir/hitex.w
===================================================================
--- trunk/Build/source/texk/web2c/hitexdir/hitex.w	2022-02-25 00:48:48 UTC (rev 62171)
+++ trunk/Build/source/texk/web2c/hitexdir/hitex.w	2022-02-25 13:43:37 UTC (rev 62172)
@@ -13847,12 +13847,15 @@
     link(tail)= p;tail= p;
   }
   link(tail)=b;tail=b;
-  if (height_known ||
-       (type(b)==whatsit_node &&
-          (subtype(b)==hpack_node || subtype(b)==vpack_node)))
-	prev_depth=depth(b);  /* then also depth is (probably) known */
+  if (height_known)
+    prev_depth=depth(b);
+  else if (type(b)==whatsit_node &&
+          (subtype(b)==hpack_node || subtype(b)==vpack_node))
+    prev_depth=depth(b);	  /* then also depth is (probably) known */
+  else if (type(b)==whatsit_node && subtype(b)==image_node)
+    prev_depth=0;
   else
-	prev_depth=unknown_depth;
+    prev_depth=unknown_depth;
 }
 
 @* Data structures for math mode.
@@ -25688,7 +25691,10 @@
       break;
   }
   if (abs(mode)==vmode)
+  { prev_depth=ignore_depth; /* this could be deleted if baseline nodes treat
+                                images as boxes in the viewer */
     append_to_vlist(p); /* image nodes have height, width, and depth like boxes */
+  }
   else
     tail_append(p);
   break;

Added: trunk/Build/source/texk/web2c/hitexdir/tex/hiltxpage.tex
===================================================================
--- trunk/Build/source/texk/web2c/hitexdir/tex/hiltxpage.tex	                        (rev 0)
+++ trunk/Build/source/texk/web2c/hitexdir/tex/hiltxpage.tex	2022-02-25 13:43:37 UTC (rev 62172)
@@ -0,0 +1,53 @@
+\ifhint
+\textwidth=\hsize
+\textheight=\vsize
+\newinsert\topins
+\skip\topins=0pt % no space added when a topinsert is present
+\count\topins=1000 % magnification factor (1 to 1)
+\dimen\topins=\maxdimen % no limit per page
+\def\topinsert{\bgroup\setbox0\vbox\bgroup}
+\def\endinsert{\egroup
+  \insert\topins{%
+  \penalty100\splittopskip0pt\floatingpenalty0\box0\nobreak\bigskip\egroup}}
+\dimen0=1.25\hsize
+\advance\dimen0 by -9pt
+\dimen1=1.25\vsize
+\advance\dimen1 by -9pt
+\HINTsetpage1 = basic 
+  priority 10
+  width  \dimen0
+  height \dimen1 
+{%
+    \maxdepth=4pt
+    \topskip=10pt
+    \HINTstream\topins %topinsert
+    \HINTstream0 %main text
+    \HINTstream\footins   
+  \HINTsetstream\topins = %topinsert 
+    prefered 0
+  {% 
+    \HINTafter = {}
+  }
+  \HINTsetstream\footins =%footnotes
+    prefered 255
+    ratio 0
+  {%
+    \hsize=300pt
+    \count\footins=1000 % the magnification factor
+    \skip\footins=\bigskipamount % the extra space needed
+    \dimen\footins=\vsize % maximum height on the page
+    \HINTbefore = 
+     {\vskip\skip\footins
+     \footnoterule}
+    \HINTafter = {}
+  }
+}% end page template
+\fi
+
+% the footins had this:
+%    \before = 
+%     {\vskip 0pt plus 1filll\vskip 9pt plus 4pt minus 2pt
+%      \kern -3pt
+%      \hrule width 5em
+%      \kern 2.6pt}
+%  }


Property changes on: trunk/Build/source/texk/web2c/hitexdir/tex/hiltxpage.tex
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property