From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/702
Path: main.gmane.org!not-for-mail
From: Hans Hagen <pragma@wxs.nl>
Newsgroups: gmane.comp.tex.context
Subject: table splitting
Date: Sat, 14 Aug 1999 12:38:53 +0200
Sender: owner-ntg-context@let.uu.nl
Message-ID: <37B5473D.8F1E882E@wxs.nl>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Trace: main.gmane.org 1035391547 26306 80.91.224.250 (23 Oct 2002 16:45:47 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Wed, 23 Oct 2002 16:45:47 +0000 (UTC)
Original-To: NTG-CONTEXT <ntg-context@ntg.nl>
Xref: main.gmane.org gmane.comp.tex.context:702
X-Report-Spam: http://spam.gmane.org/gmane.comp.tex.context:702

Hi Wybo, 

You problem was relatex to an asynchronous \pagegoal (primitive tex
dimension) combined with the fact that a par entry in a table was not
taken into account in height calculations (it was considered to be a
line). BTW, as long as you don't use vertical rules, \starttabulate is
the better alternative). 

Now, here we go: 

%%%%%%%%%%%% don't use [top] here

\dorecurse{160}{Just some text before the float. }

\startpostponing

\splitfloat
  {\placefigure{this is a floating table}}
  {\starttables[|lp(50mm)|l|]
   \NC \startitemize[packed]
       \item first item
       \item second item
       \item third item
       \item last item
       \stopitemize     \NC right column text \NC\MR
   \NC left column text \NC right column text \NC\MR
etc etc 

%%%%%%%%%%% add this (all of it!) to cont-new.tex %%%%% make sure it's
surrounded by

   \unprotect

   \protect 

%%%%%%%%% Hack for Wybo:

\def\douitstellen%
  {\the\everytopofpage
   \ifinuitstellen\else\ifcase\nofpostponedblocks\else % The \nof-test
is
     \global\pagetotal\!!zeropoint % recently added
     \global\inuitstellentrue                          % definitely
needed
     \dorecurse{\nofpostponedblocks}                   % else we can
loose
       {\haalbuffer[buf-\recurselevel]}                % or disorder
floats
     \doflushfloats % new but potential dangerous      % and that is
something
     \doglobal\newcounter\nofpostponedblocks           % we don't want,
do we?
     \global\inuitstellenfalse                         % Anyhow,
'uitstellen'
   \fi\fi}                                             % is still
suboptimal.

\newdimen\TABLEparheight

% adapted table macros  

\def\BeginTableParBox#1%
  {\setbox\scratchbox=\vtop\bgroup % \setbox added
     \hsize=#1
     \normalbaselines
     \let~=\!ttTie
     \let\-=\!ttDH
     \blanko[\v!blokkeer] % added
     \the\EveryTableParBox}

\def\EndTableParBox%
  {\removelastskip % added
  %\MakeStrut{0pt}{\StrutDepthFactor\StrutUnit}       % removed
   \egroup % finishes the \vtop begun by \BeginTableParbox
   \getboxheight\scratchdimen\of\box\scratchbox\relax % added
   \ifdim\scratchdimen>\TABLEparheight                % added
     \global\TABLEparheight=\scratchdimen             % added
   \fi                                                % added
   \box\scratchbox}

%

\def\handleTABLEbreak#1#2%
  {\ifsplittables
     \setbox0=\hbox{\AugmentedTableStrut{#1}{#2}}%
     \getboxheight\dimen0\of\box0\relax
     \ifdim\TABLEparheight>\dimen0         % new
       \dimen0=\TABLEparheight             % new
       \global\TABLEparheight=\!!zeropoint % new
     \fi                                   % new
     \ifTABLEgrayline \else
       \global\advance\TABLEheight by \dimen0
     \fi
     \ifTABLEinbreak
       \global\let\beforeTABLEline=\empty
       \gdef\afterTABLEline{\TABLEnoalign{\nobreak}}%
     \else
       \dimen2=\TABLEheight
       \advance\dimen2 by \dp\strutbox
       \advance\dimen2 by \TABLEtailheight
       \advance\dimen2 by \TABLEcaptionheight
       \advance\dimen2 by \lineheight % we're ahead
       \ifdim\dimen2>\TABLEmaxheight
         \gdef\beforeTABLEline%
           {\setTABLEforce\TABLEforcelastrow}%
         \gdef\afterTABLEline%
           {\TABLEnoalign
              {\nobreak
               \global\TABLEinbreaktrue}%
            \TABLEtail
            \TABLEnoalign
              {\goodbreak
               \calculatemaxTABLEheight\nocalculatemaxTABLEheight
               \removeTABLEtopskip
               \setTABLEaction\TABLEunknown
               \setTABLEforce \TABLEunknown}%
            \TABLEhead
            \TABLEnoalign
              {\nobreak
               \global\TABLEinbreakfalse
               \setTABLEforce\TABLEforcefirstrow}}%
       \else
         \global\let\beforeTABLEline=\empty
         \gdef\afterTABLEline{\TABLEnoalign{\nobreak}}%
       \fi
     \fi
   \else
     \global\let\beforeTABLEline=\empty
     \gdef\afterTABLEline{\TABLEnoalign{\nobreak}}%
   \fi}

This should work (it does here). 

Hans

-----------------------------------------------------------------
                                          Hans Hagen | PRAGMA ADE
              Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
      tel: 038 477 53 69 | fax: 038 477 53 74 | www.pragma-ade.nl
-----------------------------------------------------------------