From 6edbdec0d538d3e0d7dc07757373d6a69c3743bb Mon Sep 17 00:00:00 2001
From: Christoph Knittel <ck@cca.io>
Date: Sun, 11 Aug 2024 17:23:44 +0200
Subject: [PATCH] Remove @@uncurried

---
 js/src/js_promise.res         | 3 +--
 js/src/js_promise2.res        | 3 +--
 js/src/jsx.res                | 4 ----
 js/src/jsxDOM.res             | 4 ----
 js/src/jsxEvent.res           | 4 ----
 js/src/jsxPPXReactSupport.res | 2 --
 6 files changed, 2 insertions(+), 18 deletions(-)

diff --git a/js/src/js_promise.res b/js/src/js_promise.res
index ee69304..9c40ab1 100644
--- a/js/src/js_promise.res
+++ b/js/src/js_promise.res
@@ -44,8 +44,7 @@ type error
 */
 
 @new
-external make: ((~resolve: 'a => unit, ~reject: exn => unit) => unit) => promise<'a> =
-  "Promise"
+external make: ((~resolve: 'a => unit, ~reject: exn => unit) => unit) => promise<'a> = "Promise"
 
 /* `make (fun resolve reject -> .. )` */
 @val @scope("Promise") external resolve: 'a => promise<'a> = "resolve"
diff --git a/js/src/js_promise2.res b/js/src/js_promise2.res
index 797318b..5b99b9b 100644
--- a/js/src/js_promise2.res
+++ b/js/src/js_promise2.res
@@ -16,8 +16,7 @@ let catch: (promise<'a>, error => promise<'a>) => promise<'a> = %raw(`
     `)
 
 @new
-external make: ((~resolve: 'a => unit, ~reject: exn => unit) => unit) => promise<'a> =
-  "Promise"
+external make: ((~resolve: 'a => unit, ~reject: exn => unit) => unit) => promise<'a> = "Promise"
 
 @val @scope("Promise") external resolve: 'a => promise<'a> = "resolve"
 @val @scope("Promise") external reject: exn => promise<'a> = "reject"
diff --git a/js/src/jsx.res b/js/src/jsx.res
index 70f3c67..5922d4a 100644
--- a/js/src/jsx.res
+++ b/js/src/jsx.res
@@ -1,7 +1,3 @@
-/*** Internal: use Jsx directly. */
-
-@@uncurried
-
 type element
 type ref
 
diff --git a/js/src/jsxDOM.res b/js/src/jsxDOM.res
index e474be3..df0954d 100644
--- a/js/src/jsxDOM.res
+++ b/js/src/jsxDOM.res
@@ -22,10 +22,6 @@
  * along with this program; if not, write to the Free Software
  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
 
-/*** Internal: use JsxDOM directly. */
-
-@@uncurried
-
 type style = JsxDOMStyle.t
 type domRef
 
diff --git a/js/src/jsxEvent.res b/js/src/jsxEvent.res
index 0d67f22..d8de1b5 100644
--- a/js/src/jsxEvent.res
+++ b/js/src/jsxEvent.res
@@ -22,10 +22,6 @@
  * along with this program; if not, write to the Free Software
  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
 
-/*** Internal: use JsxEvent directly. */
-
-@@uncurried
-
 type synthetic<'a>
 
 module MakeEventWithType = (
diff --git a/js/src/jsxPPXReactSupport.res b/js/src/jsxPPXReactSupport.res
index 483b28c..824203d 100644
--- a/js/src/jsxPPXReactSupport.res
+++ b/js/src/jsxPPXReactSupport.res
@@ -34,8 +34,6 @@
     }
 )
 
-@@uncurried // Can't move this up as @inline not working with uncurried
-
 @module("react")
 external createElement: (Jsx.component<'props>, 'props) => Jsx.element = "createElement"