diff options
| author | Mattias Andrée <maandree@kth.se> | 2016-03-01 19:22:26 +0100 |
|---|---|---|
| committer | Mattias Andrée <maandree@kth.se> | 2016-03-01 19:22:26 +0100 |
| commit | 787dbbf337bb238bea30d66d4bf43907bca20e19 (patch) | |
| tree | c3adb1d5353b4136b78172b867c9ff56a435f5f5 /src/zseti.c | |
| parent | Avoid using the internal structure as much as possible (diff) | |
| download | libzahl-787dbbf337bb238bea30d66d4bf43907bca20e19.tar.gz libzahl-787dbbf337bb238bea30d66d4bf43907bca20e19.tar.bz2 libzahl-787dbbf337bb238bea30d66d4bf43907bca20e19.tar.xz | |
Add zcmp, zcmpi, zcmpu, zcmpmag, zset, zseti, and zsetu
Signed-off-by: Mattias Andrée <maandree@kth.se>
Diffstat (limited to 'src/zseti.c')
| -rw-r--r-- | src/zseti.c | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/zseti.c b/src/zseti.c new file mode 100644 index 0000000..c42ffd6 --- /dev/null +++ b/src/zseti.c @@ -0,0 +1,14 @@ +/* See LICENSE file for copyright and license details. */ +#include "internals" + + +void +zseti(z_t a, long long int b) +{ + if (b >= 0) { + zsetu(a, (unsigned long long int)b); + } else { + zsetu(a, (unsigned long long int)-b); + SET_SIGNUM(a, -1); + } +} |