aboutsummaryrefslogtreecommitdiffstats
path: root/z18.c
diff options
context:
space:
mode:
authorJeffrey H. Kingston <jeff@it.usyd.edu.au>2010-09-14 19:38:17 +0000
committerJeffrey H. Kingston <jeff@it.usyd.edu.au>2010-09-14 19:38:17 +0000
commit73d840b9f14b65166b92e6b43f930fd0ef7b8267 (patch)
treef4eb37a19d1b8d6e9c038b5f3e4c24fc8083bad7 /z18.c
parentd4b68bb27f42afb8338f35f9fda0c467ec5d8787 (diff)
downloadlout-73d840b9f14b65166b92e6b43f930fd0ef7b8267.tar.gz
Lout 3.19.
git-svn-id: http://svn.savannah.nongnu.org/svn/lout/trunk@7 9365b830-b601-4143-9ba8-b4a8e2c3339c
Diffstat (limited to 'z18.c')
-rw-r--r--z18.c10
1 files changed, 6 insertions, 4 deletions
diff --git a/z18.c b/z18.c
index 036cfae..5063a06 100644
--- a/z18.c
+++ b/z18.c
@@ -1,6 +1,6 @@
/*@z18.c:Galley Transfer:Declarations@****************************************/
/* */
-/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.18) */
+/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.19) */
/* COPYRIGHT (C) 1991, 2000 Jeffrey H. Kingston */
/* */
/* Jeffrey H. Kingston (jeff@cs.usyd.edu.au) */
@@ -90,7 +90,7 @@ void TransferInit(OBJECT InitEnv)
/* construct destination for root galley */
New(up_hd, HEAD);
force_gall(up_hd) = FALSE;
- actual(up_hd) = enclose_obj(up_hd) = limiter(up_hd) = nilobj;
+ actual(up_hd) = enclose_obj(up_hd) = headers(up_hd) = limiter(up_hd) = nilobj;
opt_components(up_hd) = opt_constraints(up_hd) = nilobj;
gall_dir(up_hd) = ROWM;
New(dest_index, RECEIVING);
@@ -108,6 +108,7 @@ void TransferInit(OBJECT InitEnv)
New(root_galley, HEAD);
force_gall(root_galley) = FALSE;
enclose_obj(root_galley) = limiter(root_galley) = nilobj;
+ headers(root_galley) = nilobj;
opt_components(root_galley) = opt_constraints(root_galley) = nilobj;
gall_dir(root_galley) = ROWM;
FposCopy(fpos(root_galley), *no_fpos);
@@ -198,6 +199,7 @@ OBJECT TransferBegin(OBJECT x)
AttachEnv(env, x);
SetTarget(hd);
enclose_obj(hd) = (has_enclose(actual(hd)) ? BuildEnclose(hd) : nilobj);
+ headers(hd) = nilobj;
/* search for destination for hd and release it */
Link(Up(target), index);
@@ -296,7 +298,7 @@ void TransferComponent(OBJECT x)
/* make the component into a galley */
New(hd, HEAD);
force_gall(hd) = FALSE;
- enclose_obj(hd) = limiter(hd) = nilobj;
+ enclose_obj(hd) = limiter(hd) = headers(hd) = nilobj;
opt_components(hd) = opt_constraints(hd) = nilobj;
gall_dir(hd) = ROWM;
FposCopy(fpos(hd), fpos(x));
@@ -399,7 +401,7 @@ void TransferEnd(OBJECT x)
/* make the component into a galley */
New(hd, HEAD); FposCopy(fpos(hd), fpos(x));
force_gall(hd) = FALSE;
- enclose_obj(hd) = limiter(hd) = nilobj;
+ enclose_obj(hd) = limiter(hd) = headers(hd) = nilobj;
opt_components(hd) = opt_constraints(hd) = nilobj;
gall_dir(hd) = ROWM;
actual(hd) = whereto(hd) = ready_galls(hd) = nilobj;