(TranslationUnit
    [(Program
        fixed_form2
        ()
        []
        []
        [(Declaration
            (AttrType
                TypeInteger
                []
                ()
                ()
                None
            )
            []
            [(a
            []
            []
            ()
            ()
            None
            ())]
            ()
        )]
        [(Print
            0
            ()
            [(String "OK1")
            (String "OK2")]
            ()
        )
        (Print
            0
            ()
            [(String "OK1")
            (String "OK2")
            (String "OK3")
            (String "OK4")]
            ()
        )
        (Print
            0
            ()
            [(String "1")]
            ()
        )
        (Print
            0
            ()
            [(String "2")]
            ()
        )
        (Print
            0
            ()
            [(String "1")
            (String "1   ! not comment  finish string")]
            ()
        )
        (Print
            0
            ()
            [(String "1")
            (String "1 \"\" ' 2 \"\"\"\" 3 ! also not comment finish string")]
            ()
        )
        (Print
            0
            ()
            [(String "1")
            (String "1 '' \" 2 '''' 3 ! also not comment finish string")]
            ()
        )]
        []
    )]
)
