diff options
| author | Florian Fischer <florian.fl.fischer@fau.de> | 2019-08-24 17:57:51 +0200 |
|---|---|---|
| committer | Florian Fischer <florian.fl.fischer@fau.de> | 2019-08-24 17:57:51 +0200 |
| commit | 77ac9ce0a5c55d4f79f8fb8f7daa59ddb53cb507 (patch) | |
| tree | 93d4e30a207265af03394d347bfff76ba677f3ce /src/benchmarks/cfrac/pneg.c | |
| parent | 971adefadb94e8780b1a73f08ed11d76c2ead8a2 (diff) | |
| download | allocbench-77ac9ce0a5c55d4f79f8fb8f7daa59ddb53cb507.tar.gz allocbench-77ac9ce0a5c55d4f79f8fb8f7daa59ddb53cb507.zip | |
add cfrac benchmark
Diffstat (limited to 'src/benchmarks/cfrac/pneg.c')
| -rw-r--r-- | src/benchmarks/cfrac/pneg.c | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/src/benchmarks/cfrac/pneg.c b/src/benchmarks/cfrac/pneg.c new file mode 100644 index 0000000..c781066 --- /dev/null +++ b/src/benchmarks/cfrac/pneg.c @@ -0,0 +1,25 @@ +#include "pdefs.h" /* private include file */ +#include "precision.h" /* public include file for forward refs */ +#include <string.h> + +/* + * negation + */ +precision pneg(u) + register precision u; +{ + precision w; + + (void) pparm(u); + w = palloc(u->size); + if (w == pUndef) return w; + + w->sign = u->sign; + if (pnez(u)) { /* don't create a negative 0 */ + w->sign = !w->sign; + } + (void) memcpy(w->value, u->value, u->size * sizeof(digit)); + + pdestroy(u); + return presult(w); +} |
