在设计reasonml react组件时，如何扩展HTML属性接口？

// 引入必要的模块
open ReasonReact;
open ReactDOMRe;

// 定义一个带有扩展属性的ReasonReact组件
module MyComponent = {
  /* 扩展HTML属性接口类型 */
  type htmlProps = {.
    "data-custom-attribute": string,
    "data-another-attribute": string,
    ...
  };

  /* 创建组件 */
  let component = ReasonReact.statelessComponent("MyComponent");

  /* 渲染方法 */
  let make = (~customAttribute: string, ~anotherAttribute: string, _children) => {
    /* 创建扩展属性对象 */
    let props: htmlProps = ReactDOMRe.props();

    /* 设置扩展属性的值 */
    ReactDOMRe.setProp(props, "data-custom-attribute", customAttribute);
    ReactDOMRe.setProp(props, "data-another-attribute", anotherAttribute);
    ...

    /* 渲染React元素 */
    ... // 此处省略具体代码
  };

  /* 创建React组件 */
  let component = ReasonReact.wrapReasonForJs(~component, jsProps =>
    make(
      ~customAttribute=ReactDOMRe.getStringProp(jsProps, "data-custom-attribute"),
      ~anotherAttribute=ReactDOMRe.getStringProp(jsProps, "data-another-attribute"),
      ...
    )
  );
};

// 导出组件
let make = MyComponent.component;