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