if-01.out

--- parse tree ---
[ Comment
, SoftBreak
, Code
    "typ/compiler/if-01.typ"
    ( line 2 , column 2 )
    (If
       [ ( Block (CodeBlock [ Literal (Boolean True) ])
         , Block (Content [ SoftBreak , Text "One" , Text "." , ParBreak ])
         )
       ])
, ParBreak
, Comment
, SoftBreak
, Code
    "typ/compiler/if-01.typ"
    ( line 7 , column 2 )
    (If
       [ ( Not (Equals (Block (Content [])) (Literal None))
         , Block (Content [ SoftBreak , Text "Two" , Text "." , ParBreak ])
         )
       ])
, ParBreak
, Comment
, SoftBreak
, Code
    "typ/compiler/if-01.typ"
    ( line 12 , column 2 )
    (If
       [ ( Equals
             (Plus (Literal (Int 1)) (Literal (Int 1))) (Literal (Int 1))
         , Block (Content [ SoftBreak , Text "Nope" , Text "." , ParBreak ])
         )
       , ( Literal (Boolean True)
         , Block (CodeBlock [ Literal (String "Three.") ])
         )
       ])
, ParBreak
, Comment
, SoftBreak
, Code
    "typ/compiler/if-01.typ"
    ( line 22 , column 2 )
    (If
       [ ( Literal (Boolean False)
         , Block (Content [ SoftBreak , Text "Bad" , Text "." , ParBreak ])
         )
       , ( Literal (Boolean True)
         , Block
             (CodeBlock
                [ Let
                    (BasicBind (Just (Identifier "point"))) (Literal (String "."))
                , Plus (Literal (String "Four")) (Ident (Identifier "point"))
                ])
         )
       ])
, ParBreak
, Comment
, SoftBreak
, Code
    "typ/compiler/if-01.typ"
    ( line 30 , column 2 )
    (Block
       (CodeBlock
          [ If
              [ ( Equals
                    (Literal (String "content"))
                    (FuncCall (Ident (Identifier "type")) [ BlockArg [ Text "b" ] ])
                , Block (Content [ Text "Fi" ])
                )
              , ( Literal (Boolean True) , Block (Content [ Text "Nope" ]) )
              ]
          , If
              [ ( Equals (Literal (String "content")) (Ident (Identifier "type"))
                , Block (Content [ Text "Nope" ])
                )
              , ( Literal (Boolean True)
                , Block (Content [ Text "ve" , Text "." ])
                )
              ]
          ]))
, ParBreak
, Code
    "typ/compiler/if-01.typ"
    ( line 35 , column 2 )
    (Let (BasicBind (Just (Identifier "i"))) (Literal (Int 3)))
, SoftBreak
, Code
    "typ/compiler/if-01.typ"
    ( line 36 , column 2 )
    (If
       [ ( LessThan (Ident (Identifier "i")) (Literal (Int 2))
         , Block (Content [ SoftBreak , Text "Five" , Text "." , ParBreak ])
         )
       , ( LessThan (Ident (Identifier "i")) (Literal (Int 4))
         , Block (Content [ SoftBreak , Text "Six" , Text "." , ParBreak ])
         )
       , ( Literal (Boolean True)
         , Block
             (Content [ SoftBreak , Text "Seven" , Text "." , ParBreak ])
         )
       ])
, ParBreak
]
--- evaluated ---
document(body: { text(body: [
]), 
                 text(body: [
One.]), 
                 parbreak(), 
                 parbreak(), 
                 text(body: [
]), 
                 text(body: [
Two.]), 
                 parbreak(), 
                 parbreak(), 
                 text(body: [
]), 
                 text(body: [Three.]), 
                 parbreak(), 
                 text(body: [
]), 
                 text(body: [Four.]), 
                 parbreak(), 
                 text(body: [
]), 
                 text(body: [Fi]), 
                 text(body: [ve.]), 
                 parbreak(), 
                 text(body: [
]), 
                 text(body: [
Six.]), 
                 parbreak(), 
                 parbreak() })