flow-1-00.out

--- parse tree ---
[ Code
    "typ/bugs/flow-1-00.typ"
    ( line 1 , column 2 )
    (Let
       (BasicBind (Just (Identifier "test")))
       (FuncExpr
          [ NormalParam (Identifier "x") , NormalParam (Identifier "y") ]
          (Block
             (CodeBlock
                [ If
                    [ ( Equals (Ident (Identifier "x")) (Ident (Identifier "y"))
                      , Block (Content [ Text "\9989" ])
                      )
                    , ( Literal (Boolean True)
                      , Block
                          (Content
                             [ Text "\10060"
                             , Text "("
                             , Code
                                 "typ/bugs/flow-1-00.typ"
                                 ( line 1 , column 47 )
                                 (FuncCall
                                    (Ident (Identifier "repr"))
                                    [ NormalArg (Ident (Identifier "x")) ])
                             , Space
                             , Text "/"
                             , Text "="
                             , Space
                             , Code
                                 "typ/bugs/flow-1-00.typ"
                                 ( line 1 , column 59 )
                                 (FuncCall
                                    (Ident (Identifier "repr"))
                                    [ NormalArg (Ident (Identifier "y")) ])
                             , Text ")"
                             ])
                      )
                    ]
                ]))))
, SoftBreak
, Code
    "typ/bugs/flow-1-00.typ"
    ( line 2 , column 2 )
    (Set
       (Ident (Identifier "page"))
       [ KeyValArg (Identifier "height") (Literal (Numeric 70.0 Pt)) ])
, SoftBreak
, Code
    "typ/bugs/flow-1-00.typ"
    ( line 3 , column 2 )
    (FuncCall
       (Ident (Identifier "block"))
       [ BlockArg
           [ Text "This"
           , Space
           , Text "file"
           , Space
           , Text "tests"
           , Space
           , Text "a"
           , Space
           , Text "bug"
           , Space
           , Text "where"
           , Space
           , Text "an"
           , Space
           , Text "almost"
           , Space
           , Text "empty"
           , Space
           , Text "page"
           , Space
           , Text "occurs"
           , Text "."
           ]
       ])
, SoftBreak
, Code
    "typ/bugs/flow-1-00.typ"
    ( line 4 , column 2 )
    (FuncCall
       (Ident (Identifier "block"))
       [ BlockArg
           [ SoftBreak
           , Text "The"
           , Space
           , Text "text"
           , Space
           , Text "in"
           , Space
           , Text "this"
           , Space
           , Text "second"
           , Space
           , Text "block"
           , Space
           , Text "was"
           , Space
           , Text "torn"
           , Space
           , Text "apart"
           , Space
           , Text "and"
           , Space
           , Text "split"
           , Space
           , Text "up"
           , Space
           , Text "for"
           , SoftBreak
           , Text "some"
           , Space
           , Text "reason"
           , Space
           , Text "beyond"
           , Space
           , Text "my"
           , Space
           , Text "knowledge"
           , Text "."
           , ParBreak
           ]
       ])
, ParBreak
]
--- evaluated ---
document(body: { text(body: [
]), 
                 text(body: [
]), 
                 block(body: text(body: [This file tests a bug where an almost empty page occurs.])), 
                 text(body: [
]), 
                 block(body: { text(body: [
The text in this second block was torn apart and split up for
some reason beyond my knowledge.]), 
                               parbreak() }), 
                 parbreak() })