[eso-midas] 04/16: Use fabs() instead of abs() since we removed the local abs() macro
Ole Streicher
olebole at moszumanska.debian.org
Wed Mar 25 14:16:06 UTC 2015
This is an automated email from the git hooks/post-receive script.
olebole pushed a commit to branch debian
in repository eso-midas.
commit 200d6927308a048a8932bb058dee1b26e41d540c
Author: Ole Streicher <debian at liska.ath.cx>
Date: Wed Mar 25 13:24:48 2015 +0100
Use fabs() instead of abs() since we removed the local abs() macro
---
debian/patches/resolve_conflictig_macro.patch | 76 +++++++++++++++++++++++++++
1 file changed, 76 insertions(+)
diff --git a/debian/patches/resolve_conflictig_macro.patch b/debian/patches/resolve_conflictig_macro.patch
index 8d96257..50ff4cf 100644
--- a/debian/patches/resolve_conflictig_macro.patch
+++ b/debian/patches/resolve_conflictig_macro.patch
@@ -13,3 +13,79 @@ Description: Remove abs() macro
#define sign(X, Y) (((Y) < 0) ? -abs(X) : abs(X)) /* Vorzeichen von */
/* Y mal abs(X) */
#define sqr(X) ((X) * (X)) /* Quadrat von X */
+--- a/prim/dio/libsrc/fitsrhd.c
++++ b/prim/dio/libsrc/fitsrhd.c
+@@ -532,8 +532,8 @@
+ */
+
+ else if ( (dtype == D_I2_FORMAT) &&
+- (abs(bfdef->bzero-32768.0) < eps) &&
+- (abs(bfdef->bscale-1.0) < eps) )
++ (fabs(bfdef->bzero-32768.0) < eps) &&
++ (fabs(bfdef->bscale-1.0) < eps) )
+ {
+ xtype = D_UI2_FORMAT;
+ bfdef->bitpix = -16;
+--- a/stdred/feros/libsrc/glsp.c
++++ b/stdred/feros/libsrc/glsp.c
+@@ -19,6 +19,7 @@
+
+ #include <stdio.h>
+ #include <stdlib.h>
++#include <math.h>
+
+ /* FEROS specific includes */
+
+@@ -630,13 +631,13 @@
+ und strenge Regularitaet ueberprueft
+ */
+ ud1[n] = ud2[n] = ud2[n - 1] = 0.0;
+-def_reg = abs (md[1]) + abs (ud1[1]) + abs (ud2[1]);
++def_reg = fabs (md[1]) + abs (ud1[1]) + abs (ud2[1]);
+ if (def_reg == 0.0)
+ return (1);
+ def_reg = 1. / def_reg;
+ if (md[1] < 0.0)
+ return (-1);
+-if (abs (md[1]) * def_reg <= MACH4_EPS)
++if (fabs (md[1]) * def_reg <= MACH4_EPS)
+ return (1);
+ /*
+ Zerlegung der Matrix bei gleichzeitiger Ueberpruefung
+@@ -646,14 +647,14 @@
+ ud1[1] /= md[1];
+ h_var_2 = ud2[1];
+ ud2[1] /= md[1];
+-def_reg = abs (h_var_1) + abs (md[2]) + abs (ud1[2]) + abs (ud2[2]);
++def_reg = fabs (h_var_1) + fabs (md[2]) + fabs (ud1[2]) + fabs (ud2[2]);
+ if (def_reg == 0.0)
+ return (1);
+ def_reg = 1. / def_reg;
+ md[2] -= h_var_1 * ud1[1];
+ if (md[2] < 0.0)
+ return (-1);
+-if (abs (md[2]) <= MACH4_EPS)
++if (fabs (md[2]) <= MACH4_EPS)
+ return (1);
+
+ h_var_1 = ud1[2];
+@@ -662,8 +663,8 @@
+ ud2[2] /= md[2];
+ for (i = 3; i <= n; ++i)
+ {
+- def_reg = abs (h_var_2) + abs (h_var_1) + abs (md[i])
+- + abs (ud1[i]) + abs (ud2[i]);
++ def_reg = fabs (h_var_2) + fabs (h_var_1) + fabs (md[i])
++ + fabs (ud1[i]) + fabs (ud2[i]);
+ if (def_reg == 0.0)
+ return (1);
+ def_reg = 1. / def_reg;
+@@ -671,7 +672,7 @@
+ md[i] -= (md[i - 1] * sqr (ud1[i - 1]) + h_var_2 * ud2[i - 2]);
+ if (md[i] < 0.0)
+ return (-1);
+- if (abs (md[i] * def_reg) <= MACH4_EPS)
++ if (fabs (md[i] * def_reg) <= MACH4_EPS)
+ return (1);
+ if (i < n)
+ {
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-astro/packages/eso-midas.git
More information about the debian-science-commits
mailing list