rename fOk, fError to eqOk, eqError, cmpOk, cmpError

Author: tsnobip

packages/@rescript/runtime/Stdlib_Result.res

@@ -77,20 +77,20 @@ let isError = x =>
   | Error(_) => true
   }
 
-let equal = (a, b, fOk, fError) =>
+let equal = (a, b, eqOk, eqError) =>
   switch (a, b) {
-  | (Ok(a), Ok(b)) => fOk(a, b)
+  | (Ok(a), Ok(b)) => eqOk(a, b)
   | (Error(_), Ok(_))
   | (Ok(_), Error(_)) => false
-  | (Error(a), Error(b)) => fError(a, b)
+  | (Error(a), Error(b)) => eqError(a, b)
   }
 
-let compare = (a, b, fOk, fError) =>
+let compare = (a, b, cmpOk, cmpError) =>
   switch (a, b) {
-  | (Ok(a), Ok(b)) => fOk(a, b)
+  | (Ok(a), Ok(b)) => cmpOk(a, b)
   | (Error(_), Ok(_)) => Stdlib_Ordering.less
   | (Ok(_), Error(_)) => Stdlib_Ordering.greater
-  | (Error(a), Error(b)) => fError(a, b)
+  | (Error(a), Error(b)) => cmpError(a, b)
   }
 
 let forEach = (r, f) =>

packages/@rescript/runtime/Stdlib_Result.resi

@@ -172,11 +172,11 @@ let isOk: result<'a, 'b> => bool
 let isError: result<'a, 'b> => bool
 
 /**
-`equal(res1, res2, fOk, fError)`: Determine if two `Result` variables are equal with
+`equal(res1, res2, eqOk, eqError)`: Determine if two `Result` variables are equal with
 respect to equality functions. If `res1` and `res2` are of the form `Ok(n)`
-and `Ok(m)`, return the result of `fOk(n, m)`. If one of `res1` and `res2` are of
+and `Ok(m)`, return the result of `eqOk(n, m)`. If one of `res1` and `res2` are of
 the form `Error(e)`, return false If both `res1` and `res2` are of the form
-`Error(e)`, return the result of `fError(e1, e2)`.
+`Error(e)`, return the result of `eqError(e1, e2)`.
 
 ## Examples
 
@@ -203,16 +203,16 @@ Result.equal(bad1, bad2, mod10equal, String.equal) == false
 let equal: (result<'a, 'c>, result<'b, 'd>, ('a, 'b) => bool, ('c, 'd) => bool) => bool
 
 /**
-`compare(res1, res2, fOk, fError)`: Compare two `Result` variables with respect to a
+`compare(res1, res2, cmpOk, cmpError)`: Compare two `Result` variables with respect to a
 comparison function. The comparison function returns -1. if the first variable
 is "less than" the second, 0. if the two variables are equal, and 1. if the first
 is "greater than" the second.
 
 If `res1` and `res2` are of the form `Ok(n)` and `Ok(m)`, return the result of
-`fOk(n, m)`. If `res1` is of the form `Error(e)` and `res2` of the form `Ok(n)`,
+`cmpOk(n, m)`. If `res1` is of the form `Error(e)` and `res2` of the form `Ok(n)`,
 return -1. (nothing is less than something) If `res1` is of the form `Ok(n)` and
 `res2` is of the form `Error(e)`, return 1. (something is greater than nothing) If
-both `res1` and `res2` are of the form `Error(e)`, return fError(e1, e2).
+both `res1` and `res2` are of the form `Error(e)`, return cmpError(e1, e2).
 
 ## Examples
 

packages/@rescript/runtime/lib/es6/Stdlib_Result.js

@@ -53,31 +53,31 @@ function isError(x) {
   return x.TAG !== "Ok";
 }
 
-function equal(a, b, fOk, fError) {
+function equal(a, b, eqOk, eqError) {
   if (a.TAG === "Ok") {
     if (b.TAG === "Ok") {
-      return fOk(a._0, b._0);
+      return eqOk(a._0, b._0);
     } else {
       return false;
     }
   } else if (b.TAG === "Ok") {
     return false;
   } else {
-    return fError(a._0, b._0);
+    return eqError(a._0, b._0);
   }
 }
 
-function compare(a, b, fOk, fError) {
+function compare(a, b, cmpOk, cmpError) {
   if (a.TAG === "Ok") {
     if (b.TAG === "Ok") {
-      return fOk(a._0, b._0);
+      return cmpOk(a._0, b._0);
     } else {
       return 1;
     }
   } else if (b.TAG === "Ok") {
     return -1;
   } else {
-    return fError(a._0, b._0);
+    return cmpError(a._0, b._0);
   }
 }
 

packages/@rescript/runtime/lib/js/Stdlib_Result.js

@@ -53,31 +53,31 @@ function isError(x) {
   return x.TAG !== "Ok";
 }
 
-function equal(a, b, fOk, fError) {
+function equal(a, b, eqOk, eqError) {
   if (a.TAG === "Ok") {
     if (b.TAG === "Ok") {
-      return fOk(a._0, b._0);
+      return eqOk(a._0, b._0);
     } else {
       return false;
     }
   } else if (b.TAG === "Ok") {
     return false;
   } else {
-    return fError(a._0, b._0);
+    return eqError(a._0, b._0);
   }
 }
 
-function compare(a, b, fOk, fError) {
+function compare(a, b, cmpOk, cmpError) {
   if (a.TAG === "Ok") {
     if (b.TAG === "Ok") {
-      return fOk(a._0, b._0);
+      return cmpOk(a._0, b._0);
     } else {
       return 1;
     }
   } else if (b.TAG === "Ok") {
     return -1;
   } else {
-    return fError(a._0, b._0);
+    return cmpError(a._0, b._0);
   }
 }