From eb3942e15700f3f4f61b4e46917ae8fbe614e524 Mon Sep 17 00:00:00 2001 From: Matěj Cepl Date: Sun, 19 May 2024 00:42:48 +0200 Subject: Lout 3.41. http://jeffreykingston.id.au/lout/lout-3.41.tar.gz --- z08.c | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) (limited to 'z08.c') diff --git a/z08.c b/z08.c index fabbfff..d37bfcf 100644 --- a/z08.c +++ b/z08.c @@ -1,7 +1,7 @@ /*@z08.c:Object Manifest:ReplaceWithSplit()@**********************************/ /* */ -/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.39) */ -/* COPYRIGHT (C) 1991, 2008 Jeffrey H. Kingston */ +/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.41) */ +/* COPYRIGHT (C) 1991, 2023 Jeffrey H. Kingston */ /* */ /* Jeffrey H. Kingston (jeff@it.usyd.edu.au) */ /* School of Information Technologies */ @@ -28,6 +28,8 @@ /* */ /*****************************************************************************/ #include "externs.h" +#include "parent.h" +#include "child.h" #define line_breaker(g) \ (vspace(g) > 0 || (units(gap(g)) == FRAME_UNIT && width(gap(g)) > FR)) @@ -909,7 +911,7 @@ OBJECT *enclose, BOOLEAN fcr) OBJECT res = nilobj, res_env, res_env2, hold_env, hold_env2, z, prev; OBJECT link1, link2, x1, x2, y1, y2, vc, value_env, key, value; int i, par, num1, num2; GAP res_gap; unsigned res_inc; STYLE new_style; - BOOLEAN done, multiline; FULL_CHAR ch; float scale_factor; + BOOLEAN done /* , multiline */; FULL_CHAR ch; float scale_factor; static int depth = 0; #if DEBUG_ON static unsigned int debug_type[MAX_DEPTH]; @@ -1066,7 +1068,7 @@ OBJECT *enclose, BOOLEAN fcr) assert(Down(x) != x, "Manifest: ACAT!" ); link = Down(x); Child(y, link); assert( type(y) != GAP_OBJ, "Manifest ACAT: GAP_OBJ is first!" ); - multiline = FALSE; + /* multiline = FALSE; */ /* manifest first child and insert any cross references */ if( is_word(type(y)) ) @@ -1239,7 +1241,9 @@ OBJECT *enclose, BOOLEAN fcr) break; } nobreak(gap(g)) = (width(gap(g)) == 0); + /* *** if( line_breaker(g) && is_definite(type(y)) ) multiline = TRUE; + *** */ } debug1(DOM, DD, " in ACAT, gap = %s", EchoLength(width(gap(g)))); -- cgit