File 0919-Replace-local-floor-1-with-erlang-floor-1.patch of Package erlang
From 669dfd0117102b351d19f179b139d16f6f53f843 Mon Sep 17 00:00:00 2001
From: Lars Thorsen <lars@erlang.org>
Date: Fri, 1 Nov 2019 14:20:47 +0100
Subject: [PATCH] Replace local floor/1 with erlang:floor/1
---
lib/xmerl/src/xmerl_xsd_type.erl | 11 ++---------
1 file changed, 2 insertions(+), 9 deletions(-)
diff --git a/lib/xmerl/src/xmerl_xsd_type.erl b/lib/xmerl/src/xmerl_xsd_type.erl
index 3ee5961522..a1b9e70fe1 100644
--- a/lib/xmerl/src/xmerl_xsd_type.erl
+++ b/lib/xmerl/src/xmerl_xsd_type.erl
@@ -1261,9 +1261,9 @@ compare_dateTime(_P,_Q) ->
indefinite.
fQuotient(A,B) when is_float(A) ->
- fQuotient(floor(A),B);
+ fQuotient(erlang:floor(A),B);
fQuotient(A,B) when is_float(B) ->
- fQuotient(A,floor(B));
+ fQuotient(A,erlang:floor(B));
fQuotient(A,B) when A >= 0, B >= 0 ->
A div B;
fQuotient(A,B) when A < 0, B < 0 ->
@@ -1279,13 +1279,6 @@ fQuotient(A,B) ->
fQuotient(A, Low, High) ->
fQuotient(A - Low, High - Low).
-floor(A) ->
- case round(A) of
- I when I > A ->
- I - 1;
- I -> I
- end.
-
modulo(A,B) ->
A - (fQuotient(A,B) * B).
--
2.16.4