(TranslationUnit
    [(Program
        subr2
        ()
        []
        []
        []
        [(SubroutineCall
            0
            my_subr
            []
            []
            []
            []
            ()
        )]
        []
    )
    (Subroutine
        my_subr
        []
        []
        ()
        ()
        []
        []
        []
        []
        [(Print
            0
            ()
            [(FuncCallOrArray
                sxvals
                []
                []
                []
                []
                []
            )]
            ()
        )
        (If
            0
            ()
            (/= (FuncCallOrArray
                sxvals
                []
                []
                []
                []
                []
            ) 4)
            [(ErrorStop
                0
                ()
                ()
                ()
            )]
            []
            ()
            ()
            ()
        )
        (Return
            0
            ()
            ()
        )]
        [(Function
            sxvals
            []
            [(AttrType
                TypeInteger
                []
                ()
                ()
                None
            )]
            ()
            ()
            ()
            []
            []
            []
            []
            [(Assignment
                0
                sxvals
                4
                ()
            )
            (Return
                0
                ()
                ()
            )]
            []
            []
        )]
        []
    )]
)
