From e11c7df86144bed383ac6bbeaecc3017d18b37db Mon Sep 17 00:00:00 2001 From: Toby Goodwin Date: Mon, 11 Jan 1999 10:55:18 +0000 Subject: beta: rc-1.5b4 --- addon.c | 33 ++++++++++++++++++--------------- 1 file changed, 18 insertions(+), 15 deletions(-) (limited to 'addon.c') diff --git a/addon.c b/addon.c index df3fcd7..6e6c232 100644 --- a/addon.c +++ b/addon.c @@ -1,22 +1,25 @@ /* - This file contains the implementations of any locally defined - builtins. + This file is NOT BUILT by default. Together with addon.h, it + provides an example of how to add new builtins to rc. */ -#ifdef DWS - -/* - This is what DaviD Sanderson (dws@cs.wisc.edu) uses. -*/ +#include "rc.h" +#include "addon.h" -#include -#include -#include +void b_sum(char **av) { + long sum = 0; -#include "rc.h" /* for bool TRUE, FALSE */ -#include "addon.h" + while (*++av) + sum += atol(*av); + fprint(1, "%ld\n", sum); + set(TRUE); +} -#include "addon/access.c" -#include "addon/test.c" +void b_prod(char **av) { + long sum = 1; -#endif + while (*++av) + sum *= atol(*av); + fprint(1, "%ld\n", sum); + set(TRUE); +} -- cgit v1.2.3