set-02.out

--- parse tree ---
[ Code
    "typ/compiler/set-02.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/compiler/set-02.typ"
                                 ( line 1 , column 47 )
                                 (FuncCall
                                    (Ident (Identifier "repr"))
                                    [ NormalArg (Ident (Identifier "x")) ])
                             , Space
                             , Text "/"
                             , Text "="
                             , Space
                             , Code
                                 "typ/compiler/set-02.typ"
                                 ( line 1 , column 59 )
                                 (FuncCall
                                    (Ident (Identifier "repr"))
                                    [ NormalArg (Ident (Identifier "y")) ])
                             , Text ")"
                             ])
                      )
                    ]
                ]))))
, SoftBreak
, Comment
, Comment
, Code
    "typ/compiler/set-02.typ"
    ( line 4 , column 2 )
    (Set
       (Ident (Identifier "block"))
       [ KeyValArg (Identifier "spacing") (Literal (Numeric 4.0 Pt)) ])
, SoftBreak
, Code
    "typ/compiler/set-02.typ"
    ( line 5 , column 2 )
    (Set
       (Ident (Identifier "text"))
       [ KeyValArg (Identifier "style") (Literal (String "italic"))
       , KeyValArg (Identifier "fill") (Ident (Identifier "eastern"))
       ])
, SoftBreak
, Code
    "typ/compiler/set-02.typ"
    ( line 6 , column 2 )
    (Let
       (BasicBind (Just (Identifier "x")))
       (Block
          (Content
             [ Text "And"
             , Space
             , Text "the"
             , Space
             , Text "red"
             , Space
             , Code
                 "typ/compiler/set-02.typ"
                 ( line 6 , column 24 )
                 (FuncCall (Ident (Identifier "parbreak")) [])
             , Space
             , Text "lay"
             , Space
             , Text "silent!"
             ])))
, SoftBreak
, Code
    "typ/compiler/set-02.typ"
    ( line 7 , column 2 )
    (FuncCall
       (Ident (Identifier "text"))
       [ KeyValArg (Identifier "fill") (Ident (Identifier "red"))
       , NormalArg (Ident (Identifier "x"))
       ])
, ParBreak
]
--- evaluated ---
document(body: { text(body: [
]), 
                 text(body: [
]), 
                 text(body: [
], 
                      fill: rgb(13%,61%,67%,100%), 
                      style: "italic"), 
                 text(body: [
], 
                      fill: rgb(13%,61%,67%,100%), 
                      style: "italic"), 
                 text(body: { text(body: [And the red ], 
                                   fill: rgb(13%,61%,67%,100%), 
                                   style: "italic"), 
                              parbreak(), 
                              text(body: [ lay silent!], 
                                   fill: rgb(13%,61%,67%,100%), 
                                   style: "italic") }, 
                      fill: rgb(100%,25%,21%,100%), 
                      style: "italic"), 
                 parbreak() })