1/*
2 * librdkafka - Apache Kafka C library
3 *
4 * Copyright (c) 2012-2018, Magnus Edenhill
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions are met:
9 *
10 * 1. Redistributions of source code must retain the above copyright notice,
11 * this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright notice,
13 * this list of conditions and the following disclaimer in the documentation
14 * and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 */
28
29#pragma once
30
31
32/**
33 * rd_dbl_eq0(a,b,prec)
34 * Check two doubles for equality with the specified precision.
35 * Use this instead of != and == for all floats/doubles.
36 * More info:
37 * http://docs.sun.com/source/806-3568/ncg_goldberg.html
38 */
39static RD_INLINE RD_UNUSED
40int rd_dbl_eq0 (double a, double b, double prec) {
41 return fabs(a - b) < prec;
42}
43
44/* A default 'good' double-equality precision value.
45 * This rather timid epsilon value is useful for tenths, hundreths,
46 * and thousands parts, but not anything more precis than that.
47 * If a higher precision is needed, use dbl_eq0 and dbl_eq0 directly
48 * and specify your own precision. */
49#define RD_DBL_EPSILON 0.00001
50
51/**
52 * rd_dbl_eq(a,b)
53 * Same as rd_dbl_eq0() above but with a predefined 'good' precision.
54 */
55#define rd_dbl_eq(a,b) rd_dbl_eq0(a,b,RD_DBL_EPSILON)
56
57/**
58 * rd_dbl_ne(a,b)
59 * Same as rd_dbl_eq() above but with reversed logic: not-equal.
60 */
61#define rd_dbl_ne(a,b) (!rd_dbl_eq0(a,b,RD_DBL_EPSILON))
62
63/**
64 * rd_dbl_zero(a)
65 * Checks if the double `a' is zero (or close enough).
66 */
67#define rd_dbl_zero(a) rd_dbl_eq0(a,0.0,RD_DBL_EPSILON)
68