Unified · Split
| @@ -1,5 +1,5 @@ | ||
| 1 | 1 | /* |
| 2 | −** Copyright (C) 2002-2006 Erik de Castro Lopo <erikd@mega-nerd.com> | |
| 2 | +** Copyright (C) 2002-2007 Erik de Castro Lopo <erikd@mega-nerd.com> | |
| 3 | 3 | ** |
| 4 | 4 | ** This program is free software; you can redistribute it and/or modify |
| 5 | 5 | ** it under the terms of the GNU General Public License as published by |
| @@ -129,13 +129,21 @@ const char* zoh_get_description (int src_enum) ; · 123 unmodified lines | ||
| 129 | 129 | |
| 130 | 130 | int zoh_set_converter (SRC_PRIVATE *psrc, int src_enum) ; |
| 131 | 131 | |
| 132 | −#endif /* COMMON_H_INCLUDED */ | |
| 133 | − | |
| 134 | −/* | |
| 135 | −** Do not edit or modify anything in this comment block. | |
| 136 | −** The arch-tag line is a file identity tag for the GNU Arch | |
| 137 | −** revision control system. | |
| 138 | −** | |
| 139 | −** arch-tag: 737d46dc-a2f8-4025-bb88-fc8915c69085 | |
| 132 | +/*---------------------------------------------------------- | |
| 133 | +** Common static inline functions. | |
| 140 | 134 | */ |
| 141 | 135 | |
| 136 | +static inline double | |
| 137 | +fmod_one (double x) | |
| 138 | +{ double y = 1.0 ; | |
| 139 | + double i, f ; | |
| 140 | + | |
| 141 | + i = floor (x / y) ; | |
| 142 | + f = x - i * y ; | |
| 143 | + if ((x < 0.0) != (y < 0.0)) | |
| 144 | + f = f - y ; | |
| 145 | + return f ; | |
| 146 | +} /* fmod_one */ | |
| 147 | + | |
| 148 | +#endif /* COMMON_H_INCLUDED */ | |
| 149 | + | |