(command.CommandList children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:REASON_DIR) op: assign_op.Equal rhs: { (command_sub left_token: <Id.Left_Backtick '`'> command_list: (command.CommandList children:[(C {<ocamlfind>} {<query>} {<reason>})]) ) } spids: [8] ) ] ) (C {<ocamlfind>} {<ocamldoc>} {<-g>} {($ Id.VSub_DollarName '$REASON_DIR') </reasondoc.cma>} {($ Id.VSub_At '$@')} ) ] )