(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:REASON_DIR)
          op: Equal
          rhs: 
            {
              (CommandSubPart
                command_list: (CommandList children:[(C {(ocamlfind)} {(query)} {(reason)})])
                left_token: <Left_Backtick '`'>
                spids: [9 15]
              )
            }
          spids: [8]
        )
      ]
      spids: [8]
    )
    (C {(ocamlfind)} {(ocamldoc)} {(-g)} {($ VSub_Name '$REASON_DIR') (/reasondoc.cma)} {($ VSub_At '$@')})
  ]
)