aboutsummaryrefslogtreecommitdiff
path: root/src/benchmarks/cfrac/pcmp.c
diff options
context:
space:
mode:
authorFlorian Fischer <florian.fl.fischer@fau.de>2020-05-06 16:56:32 +0200
committerFlorian Fischer <florian.fl.fischer@fau.de>2020-06-02 11:18:47 +0200
commit8174a918ea3b7cb216bf7ea98cfdc10661b5c37d (patch)
tree0747ec3ccb9f8d7eeccfac35977fc17855ca3bbb /src/benchmarks/cfrac/pcmp.c
parent8f52e8fc02dd235582f5961941bcd564e9a681cd (diff)
downloadallocbench-8174a918ea3b7cb216bf7ea98cfdc10661b5c37d.tar.gz
allocbench-8174a918ea3b7cb216bf7ea98cfdc10661b5c37d.zip
make the whole project more python idiomatic
* rename src directory to allocbench * make global variable names UPPERCASE * format a lot of code using yapf * use lowercase ld_preload and ld_library_path as Allocator members * name expected Errors 'err' and don't raise a new Exception * disable some pylint messages
Diffstat (limited to 'src/benchmarks/cfrac/pcmp.c')
-rw-r--r--src/benchmarks/cfrac/pcmp.c68
1 files changed, 0 insertions, 68 deletions
diff --git a/src/benchmarks/cfrac/pcmp.c b/src/benchmarks/cfrac/pcmp.c
deleted file mode 100644
index 2c8e0b8..0000000
--- a/src/benchmarks/cfrac/pcmp.c
+++ /dev/null
@@ -1,68 +0,0 @@
-#include "pdefs.h"
-#include "precision.h"
-
-/*
- * Compare to zero (normalization not assumed)
- *
- * Returns same as pcmp(u, 0);
- */
-int pcmpz(u)
- register precision u;
-{
- register digitPtr uPtr;
- register int i;
-
- (void) pparm(u);
- i = 0;
- uPtr = u->value;
- do {
- if (*uPtr++ != 0) {
- if (u->sign) i = -1; else i = 1;
- break;
- }
- } while (uPtr < u->value + u->size);
-
- pdestroy(u);
- return i;
-}
-
-/*
- * Compare u to v.
- *
- * Return: < 0 if u < v
- * = 0 if u = v
- * > 0 if u > v
- *
- * This routine is the one that assumes results are normalized!
- * - no leading 0's
- * - no negative 0
- */
-int pcmp(u, v)
- precision u, v;
-{
- register digitPtr uPtr, vPtr;
- register int i; /* should be bigger than posit */
-
- (void) pparm(u);
- (void) pparm(v);
- if (u->sign != v->sign) {
- if (u->sign) i = -1; else i = 1;
- } else {
- i = u->size - v->size;
- if (i == 0) {
- uPtr = u->value + u->size;
- vPtr = v->value + v->size;
- do {
- if (*--uPtr != *--vPtr) break;
- } while (vPtr > v->value);
- if (*uPtr > *vPtr) i = 1;
- else if (*uPtr < *vPtr) i = -1;
- }
-
- if (u->sign) i = -i;
- }
-
- pdestroy(u);
- pdestroy(v);
- return i;
-}