インデントを足した

ガ出力

((class ClassName
        (f :: int -> char -> float -> string)
        (g :: void -> double))
 (struct StructName : []
         (n:int)
         (s:string))
 (struct Klass : [ClassName, ]
         (m:int)
         (t:string))
 (add :: int(a) -> int(b) -> int
      ((return:stat (a + b))))
 (main :: int(argc) -> string(args) -> int
       ((2501)
        ((1) + (2))
        ("string literal")
        ((((1) + ((((2) * (3)) / (4)) % (5))) + (6)) - (7))
        (:key)
        (("first") + ("second"))
        (f )
        (g (2501))
        (h (1), (2), ("str"))
        (if (1)
            (("true")
             ("false")))
        (if (1)
            (("true")
             ("TRUE"))
          (("false")
           ("FALSE")
           (while (1)
             (("while loop")
              (break:stat )
              (continue:stat )
              (return:stat )))))
        (for (1) (i <= n) (3)
             ((4)))
        (n:int)
        (i:int)
        (c:char)
        (n = (10))
        (n = (n + (10)))
        (for (i = (0)) (i <= n) (i = (i + (1)))
             ((j:int)
              (j = (10))))
        #{(1), (2), (3), (f (4)), (5), }
        (return:stat (42)))))