@@ -5,6 +5,7 @@ let undefined: undefined = Js.Undefined.empty;
55[@ mel . module "react" ]
66external reactAct : ((. unit ) => undefined ) => unit = "act" ;
77
8+ [@ deprecated "use React.act instead" ]
89let act : (unit => unit ) => unit =
910 func => {
1011 let reactFunc =
@@ -19,6 +20,7 @@ let act: (unit => unit) => unit =
1920external reactActAsync : ((. unit ) => Js . Promise . t (' a )) => Js . Promise . t (unit ) =
2021 "act" ;
2122
23+ [@ deprecated "use React.actAsync instead" ]
2224let actAsync = func => {
2325 let reactFunc =
2426 (.) => {
@@ -27,35 +29,73 @@ let actAsync = func => {
2729 reactActAsync(reactFunc);
2830};
2931
32+ [@ deprecated
33+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
34+ ]
3035[@ mel . module "react-dom/test-utils" ]
3136external isElement : ' element => bool = "isElement" ;
3237
38+ [@ deprecated
39+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
40+ ]
3341[@ mel . module "react-dom/test-utils" ]
3442external isElementOfType : (' element , React . component (' props )) => bool =
3543 "isElementOfType" ;
3644
45+ [@ deprecated
46+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
47+ ]
3748[@ mel . module "react-dom/test-utils" ]
3849external isDOMComponent : ' element => bool = "isDOMComponent" ;
3950
51+ [@ deprecated
52+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
53+ ]
4054[@ mel . module "react-dom/test-utils" ]
4155external isCompositeComponent : ' element => bool = "isCompositeComponent" ;
4256
57+ [@ deprecated
58+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
59+ ]
4360[@ mel . module "react-dom/test-utils" ]
4461external isCompositeComponentWithType :
4562 (' element , React . component (' props )) => bool =
4663 "isCompositeComponentWithType" ;
4764
4865module Simulate = {
49- [@ mel . module "react-dom/test-utils" ] [@ mel . scope "Simulate" ]
66+ [@ deprecated
67+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
68+ ]
69+ [@ mel . module "react-dom/test-utils" ]
70+ [@ mel . scope "Simulate" ]
5071 external click : Dom . element => unit = "click" ;
51- [@ mel . module "react-dom/test-utils" ] [@ mel . scope "Simulate" ]
72+
73+ [@ deprecated
74+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
75+ ]
76+ [@ mel . module "react-dom/test-utils" ]
77+ [@ mel . scope "Simulate" ]
5278 external clickWithEvent : (Dom . element , ' event ) => unit = "click" ;
53- [@ mel . module "react-dom/test-utils" ] [@ mel . scope "Simulate" ]
79+ [@ deprecated
80+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
81+ ]
82+ [@ mel . module "react-dom/test-utils" ]
83+ [@ mel . scope "Simulate" ]
5484 external change : Dom . element => unit = "change" ;
55- [@ mel . module "react-dom/test-utils" ] [@ mel . scope "Simulate" ]
85+
86+ [@ deprecated
87+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
88+ ]
89+ [@ mel . module "react-dom/test-utils" ]
90+ [@ mel . scope "Simulate" ]
5691 external blur : Dom . element => unit = "blur" ;
92+
5793 [@ mel . module "react-dom/test-utils" ] [@ mel . scope "Simulate" ]
5894 external changeWithEvent : (Dom . element , ' event ) => unit = "change" ;
95+
96+ [@ deprecated
97+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
98+ ]
5999 let changeWithValue = (element, value) => {
60100 let event = {
61101 "target" : {
@@ -64,6 +104,10 @@ module Simulate = {
64104 };
65105 changeWithEvent(element, event);
66106 };
107+
108+ [@ deprecated
109+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
110+ ]
67111 let changeWithChecked = (element, value) => {
68112 let event = {
69113 "target" : {
@@ -72,11 +116,23 @@ module Simulate = {
72116 };
73117 changeWithEvent(element, event);
74118 };
75- [@ mel . module "react-dom/test-utils" ] [@ mel . scope "Simulate" ]
119+ [@ deprecated
120+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
121+ ]
122+ [@ mel . module "react-dom/test-utils" ]
123+ [@ mel . scope "Simulate" ]
76124 external canPlay : Dom . element => unit = "canPlay" ;
77- [@ mel . module "react-dom/test-utils" ] [@ mel . scope "Simulate" ]
125+ [@ deprecated
126+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
127+ ]
128+ [@ mel . module "react-dom/test-utils" ]
129+ [@ mel . scope "Simulate" ]
78130 external timeUpdate : Dom . element => unit = "timeUpdate" ;
79- [@ mel . module "react-dom/test-utils" ] [@ mel . scope "Simulate" ]
131+ [@ deprecated
132+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
133+ ]
134+ [@ mel . module "react-dom/test-utils" ]
135+ [@ mel . scope "Simulate" ]
80136 external ended : Dom . element => unit = "ended" ;
81137 [@ mel . module "react-dom/test-utils" ] [@ mel . scope "Simulate" ]
82138 external focus : Dom . element => unit = "focus" ;
@@ -101,7 +157,9 @@ external body: Dom.document => option(Dom.element) = "body";
101157[@ mel . send ]
102158external createElement : (Dom . document , string ) => Dom . element =
103159 "createElement" ;
160+
104161[@ mel . send ] external remove : Dom . element => unit = "remove" ;
162+
105163[@ mel . send ]
106164external appendChild : (Dom . element , Dom . element ) => Dom . element =
107165 "appendChild" ;
@@ -111,38 +169,63 @@ let querySelectorAll = (element, string) => {
111169};
112170
113171module DOM = {
114- [@ mel . return nullable] [@ mel . get ]
172+ [@ deprecated
173+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-webapi instead."
174+ ]
175+ [@ mel . return nullable]
176+ [@ mel . get ]
115177 external value : Dom . element => option (string ) = "value" ;
116178
179+ [@ deprecated
180+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-webapi instead."
181+ ]
117182 let findBySelector = (element, selector) =>
118183 querySelector(element, selector);
119184
185+ [@ deprecated
186+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-webapi instead."
187+ ]
120188 let findByAllSelector = (element, selector) =>
121189 querySelectorAll(element, selector);
122190
191+ [@ deprecated
192+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-webapi instead."
193+ ]
123194 let findBySelectorAndTextContent = (element, selector, content) =>
124195 querySelectorAll(element, selector)
125196 |> Array . find_opt(node => node-> textContent === content);
126197
198+ [@ deprecated
199+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-webapi instead."
200+ ]
127201 let findBySelectorAndPartialTextContent = (element, selector, content) =>
128202 querySelectorAll(element, selector)
129203 |> Array . find_opt(node =>
130204 Js . String . includes(~search= content, node-> textContent)
131205 );
132206};
133207
208+ [@ deprecated
209+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
210+ ]
134211let prepareContainer = (container: ref (option (Dom . element )), () ) => {
135212 let containerElement = document-> createElement("div" );
136213 let _ : option (_ ) =
137214 Option . map(body => body-> appendChild(containerElement), document-> body);
138215 container := Some (containerElement);
139216};
140217
218+ [@ deprecated
219+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
220+ ]
141221let cleanupContainer = (container: ref (option (Dom . element )), () ) => {
142222 let _ : option (_ ) = Option . map(remove, container^ );
143223 container := None ;
144224};
145225
226+ [@ deprecated
227+ "ReactDOMTestUtils is deprecated, and will be removed in next version. Please use melange-testing-library instead."
228+ ]
146229let getContainer = container => {
147230 container. contents-> Option . get;
148231};
0 commit comments