From a049db580776ed41bb4583bfb331d97c5a80900a Mon Sep 17 00:00:00 2001 From: Mattias Andrée Date: Sun, 19 Jun 2016 02:50:31 +0200 Subject: Add examples: sum, prod, avg, median MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Mattias Andrée --- examples/02-prod.c | 36 ++++++++++++++++++++++++++++++++++++ 1 file changed, 36 insertions(+) create mode 100644 examples/02-prod.c (limited to 'examples/02-prod.c') diff --git a/examples/02-prod.c b/examples/02-prod.c new file mode 100644 index 0000000..8b7af40 --- /dev/null +++ b/examples/02-prod.c @@ -0,0 +1,36 @@ +/* Calculates the product of $@ */ + +#include +#include + +#include + +int +main(int argc, char *argv[]) +{ + z_t prod, factor; + jmp_buf env; + char *buf; + int i; + + if (setjmp(env)) + return zperror(argv[0]), 1; + + zsetup(env); + zinit(prod); + zinit(factor); + zsetu(prod, 1); + + for (i = 1; i < argc; i++) { + zsets(factor, argv[i]); + zmul(prod, prod, factor); + } + + printf("%s\n", buf = zstr(prod, NULL, 0)); + free(buf); + + zfree(factor); + zfree(prod); + zunsetup(); + return 0; +} -- cgit v1.2.3-70-g09d2