X-Git-Url: https://hackdaworld.org/gitweb/?a=blobdiff_plain;f=betty%2Ffunctions.c;h=cc03941f26a9dacb68581b63f061a50b1d6f3960;hb=69c590669acb39977d264c7c2103e0d2582b2e36;hp=43dfebc16b2856d2e81cd143520946720867e10c;hpb=62c9b5c57e036a7a2cae5670349b86b060775706;p=my-code%2Farm.git

diff --git a/betty/functions.c b/betty/functions.c
index 43dfebc..cc03941 100644
--- a/betty/functions.c
+++ b/betty/functions.c
@@ -11,16 +11,20 @@
  * functions
  */
 
-int strlen(char *string) {
+#define modulo(d,x,y)	(d)=(x); \
+			while((d)>=(y)) \
+				(d)-=(y);
 
-	int cnt;
+int strlen(char *s) {
 
-	cnt=0;
+	int n;
 
-	while(string[cnt])
-		cnt++;
+	n=0;
 
-	return cnt;
+	while(s[n])
+		n++;
+
+	return n;
 }
 
 int strncmp(char *a,char *b,int n) {