Rename function to Js_exn.anyToExnInternal

Author: ryyppy

jscomp/others/js_exn.ml

@@ -45,7 +45,7 @@ external makeError : string -> error = "Error" [@@bs.new]
 external isCamlExceptionOrOpenVariant : 
   'a -> bool = "caml_is_extension"
 
-let unsafeAnyToExn obj =
+let anyToExnInternal obj =
   if isCamlExceptionOrOpenVariant obj then
     (Obj.magic obj : exn)
   else

jscomp/others/js_exn.mli

@@ -43,7 +43,7 @@ external isCamlExceptionOrOpenVariant:
   'a -> bool = "caml_is_extension"
 (** internal use only *)
 
-val unsafeAnyToExn : 'a -> exn
+val anyToExnInternal: 'a -> exn
 (** [unsafeAnyToExn obj] will take any value [obj] and wrap it
  * in a Js.Exn.Error if given value is not an exn already. If
  * [obj] is an exn, it will return [obj] without any changes.