Gecko [ v3.cesa.co.za ]

Name	Size	Permission	Date
array.ps	10.34 KB	-rw-r--r--	2013-05-22 07:56
background.image.ps	7.77 KB	-rw-r--r--	2013-05-22 07:56
background.ps	1.33 KB	-rw-r--r--	2013-05-22 07:56
border.ps	6.04 KB	-rw-r--r--	2013-05-22 07:56
box.block.inline.ps	1.45 KB	-rw-r--r--	2013-05-22 07:56
box.block.ps	8.46 KB	-rw-r--r--	2013-05-22 07:56
box.break.ps	2.77 KB	-rw-r--r--	2013-05-22 07:56
box.button.ps	3.44 KB	-rw-r--r--	2013-05-22 07:56
box.checkbutton.ps	2.45 KB	-rw-r--r--	2013-05-22 07:56
box.container.ps	36.76 KB	-rw-r--r--	2013-05-22 07:56
box.frame.ps	7.71 KB	-rw-r--r--	2013-05-22 07:56
box.generic.inline.ps	3.27 KB	-rw-r--r--	2013-05-22 07:56
box.generic.ps	31.94 KB	-rw-r--r--	2013-05-22 07:56
box.iframe.ps	79 B	-rw-r--r--	2013-05-22 07:56
box.image.ps	4.84 KB	-rw-r--r--	2013-05-22 07:56
box.inline.ps	10.88 KB	-rw-r--r--	2013-05-22 07:56
box.inline.whitespace.ps	2.3 KB	-rw-r--r--	2013-05-22 07:56
box.input.check.ps	1.4 KB	-rw-r--r--	2013-05-22 07:56
box.input.radio.ps	884 B	-rw-r--r--	2013-05-22 07:56
box.input.text.ps	1.56 KB	-rw-r--r--	2013-05-22 07:56
box.list-item.ps	6.71 KB	-rw-r--r--	2013-05-22 07:56
box.ps	92 B	-rw-r--r--	2013-05-22 07:56
box.radiobutton.ps	2.15 KB	-rw-r--r--	2013-05-22 07:57
box.select.ps	2.76 KB	-rw-r--r--	2013-05-22 07:57
box.span.ps	97 B	-rw-r--r--	2013-05-22 07:57
box.table.cell.fake.ps	322 B	-rw-r--r--	2013-05-22 07:57
box.table.cell.ps	4.55 KB	-rw-r--r--	2013-05-22 07:57
box.table.ps	51.69 KB	-rw-r--r--	2013-05-22 07:57
box.table.row.ps	5.22 KB	-rw-r--r--	2013-05-22 07:57
box.text.ps	10.5 KB	-rw-r--r--	2013-05-22 07:57
box.whitespace.ps	2.39 KB	-rw-r--r--	2013-05-22 07:57
cellspan.ps	294 B	-rw-r--r--	2013-05-22 07:57
class.ps	826 B	-rw-r--r--	2013-05-22 07:57
color.ps	747 B	-rw-r--r--	2013-05-22 07:57
containing_block.ps	167 B	-rw-r--r--	2013-05-22 07:57
context.ps	15.66 KB	-rw-r--r--	2013-05-22 07:57
encoding.dingbats.ps	2.13 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-10.ps	2.86 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-11.ps	2.82 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-13.ps	2.93 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-14.ps	2.88 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-15.ps	2.87 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-2.ps	150 B	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-3.ps	2.92 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-4.ps	2.87 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-5.ps	3 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-7.ps	2.84 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-9.ps	2.91 KB	-rw-r--r--	2013-05-22 07:57
encoding.koi8-r.ps	3.01 KB	-rw-r--r--	2013-05-22 07:57
encoding.symbol.ps	3.08 KB	-rw-r--r--	2013-05-22 07:57
encoding.windows-1250.ps	6.17 KB	-rw-r--r--	2013-05-22 07:57
encoding.windows-1251.ps	8.39 KB	-rw-r--r--	2013-05-22 07:57
encoding.windows-1252.ps	8.5 KB	-rw-r--r--	2013-05-22 07:57
fastps.footer.ps	24 B	-rw-r--r--	2013-05-22 07:57
fastps.header.ps	11 KB	-rw-r--r--	2013-05-22 07:57
flow.block.ps	2.89 KB	-rw-r--r--	2013-05-22 07:57
flow.box.ps	1.47 KB	-rw-r--r--	2013-05-22 07:57
flow.float.ps	1.47 KB	-rw-r--r--	2013-05-22 07:57
flow.inline.block.ps	1.57 KB	-rw-r--r--	2013-05-22 07:57
flow.inline.ps	3.31 KB	-rw-r--r--	2013-05-22 07:57
flow.legend.ps	1.79 KB	-rw-r--r--	2013-05-22 07:57
flow.table.ps	4.85 KB	-rw-r--r--	2013-05-22 07:57
flow_viewport.ps	594 B	-rw-r--r--	2013-05-22 07:57
font.ps	1.66 KB	-rw-r--r--	2013-05-22 07:57
footer.ps	4.92 KB	-rw-r--r--	2013-05-22 07:57
geometry.ps	1.34 KB	-rw-r--r--	2013-05-22 07:57
header.ps	22.95 KB	-rw-r--r--	2013-05-22 07:57
height.ps	7.47 KB	-rw-r--r--	2013-05-22 07:57
image.ps	10.34 KB	-rw-r--r--	2013-05-22 07:57
init.ps	211 B	-rw-r--r--	2013-05-22 07:57
position.ps	153 B	-rw-r--r--	2013-05-22 07:57
predicates.ps	618 B	-rw-r--r--	2013-05-22 07:57
table.ps	52.42 KB	-rw-r--r--	2013-05-22 07:57
table.row.ps	422 B	-rw-r--r--	2013-05-22 07:57
text-align.ps	3.71 KB	-rw-r--r--	2013-05-22 07:57
vertical-align.ps	1.86 KB	-rw-r--r--	2013-05-22 07:57
viewport.ps	2.99 KB	-rw-r--r--	2013-05-22 07:57
width.ps	1.15 KB	-rw-r--r--	2013-05-22 07:57

Rename

/flow-table {                      % => Parent Child
% Calculate margin values if they have been set as a percentage 
  2 copy
  calc-percentage-margins

% Calculate width value if it have been set as a percentage
  2 copy
  calc-percentage-width

%  dup get-box-dict 
%  /Parent known {
%    dup calc-auto-width-margins
%  } if                             % => Parent Child

% As table width can be deterimined by its contents, we may calculate auto values 
% only AFTER the contents have been reflown; thus, we'll offset the table 
% as a whole by a value of left margin AFTER the content reflow

% suppress top/bottom margin for the first block box inside the table cell
% check if parent of this block is the table cell
  1 index get-box-dict /Display get
  /table-cell eq {
% check if current box is the first child
    1 index get-content 0 get 1 index eq {
      0 1 index put-margin-top
    } if
% check if current box is the last child
    1 index get-content array-last 1 index eq {
      0 1 index put-margin-bottom
    } if
  } if

% DO MARGIN COLLAPSING
  1 index get-line               % => Parent Child Line
  length                         % => Parent Child LL

0 gt {                         % => Parent Child 
    dup get-margin-top
    context-push-collapsed-margin-top

dup get-margin-top
    neg
  } {
    1 index get-last             % => Parent Child Last
% Check if current element if the first child 
    dup () eq { true } 
      { 1 index is-container not } ifelse
    { 
      pop                          % => Parent Child
% If parent is a table-cell, suppress top-margin
      1 index get-display  
      /table-cell eq {
        0

1 index get-margin-top
        context-push-collapsed-margin-top
      } {
% Collapse with parent margins
        dup get-margin-top         % => Parent Child ChildMT
        context-get-collapsed-margin-top
        min                        % => Parent Child min(ChildMT, ParentCMT)
        1 index get-margin-top     
        sub
            
        1 index get-margin-top
        context-get-collapsed-margin-top
        max
        context-push-collapsed-margin-top
      } ifelse
    } {                          % => Parent Child Last
% Collapse with sibling margins
      dup get-margin-bottom
      2 index get-margin-top
      max
      context-push-collapsed-margin-top

get-margin-bottom          % => Parent Child M
      1 index get-margin-top
      exch sub 0 max neg      
    } ifelse
  } ifelse
  2 index get-current-y          % => Parent Child M CY
  add                            % => Parent Child M+CY

% While drawing, we need position of margin edge, not border edge.
  1 index get-margin-top
  add                              % => Parent Child DY

% Check if we need to offset box vertically due the 'clear' property
  apply-clear

% Set the calculated value as the outer edge of this box
  2 index put-current-y          % => Parent Child

1 index close-line             % => 
  dup 2 index append-line

% Set position of upper-left child corner
  1 index get-current-x
  2 index get-current-y       % => Parent Child X Y

2 index
  move-to-box                 % => Parent Child

% By default, child block box will fill all available parent width;
% note that actual width will be smaller because of non-zero padding, border and margins
  1 index get-width         % => Parent Child PW
  1 index put-full-width    % => Parent Child

% reflow contents
  reflow                    % => Parent Child

% Update the collapsed margin value, with current box bottom margin  
  context-pop-collapsed-margin-top
  
  dup get-margin-bottom
  context-push-collapsed-margin-top

% Calculate margins and/or width is 'auto' values have been specified
  dup get-box-dict 
  /Parent known {
    dup calc-auto-width-margins
  } if                             % => Parent Child

% if left margin had 'auto' value, we need to offeset the box content by it value,
% as it changed; if margin had fixed value, we weill not offset content
  dup get-box-dict
  /Margin get
  /Auto get
  /Left get {
    dup get-margin-left 0            % => Parent Child LM 0
    2 index get-table-content        % => Parent Child LM 0 Content
    {
        2 index 2 index
        offset-box
    } forall
    pop pop                          % => Parent Child
  } if

%  dup 
%  dup get-margin-left
%  0 offset-box                     % => Parent Child

% we're now interested in last content y, not the bottom border of the containing
% block, because, due the min-height, bottom border can contain lesser (lower on the page)
% value than current y
%  1 index get-bottom-internal
  1 index get-current-y
  1 index get-bottom
  sub

2 index exch                  % => Parent Child Parent CH
  extend-height pop             % => Parent Child
  
  1 index get-right-internal
  2 index put-current-x

% terminate current line box
  1 index close-line

% clear the stack
  pop pop
} def