From a11e7768fa43b716a6eb7b0333528474a3a89380 Mon Sep 17 00:00:00 2001 From: AJ Rossini Date: Wed, 20 Jun 2007 08:35:36 +0200 Subject: [PATCH] Whitespace and compile warning cleanup --- lib/Makefile | 5 ++++- lib/functions.c | 3 +-- lib/lowess.c | 2 +- 3 files changed, 6 insertions(+), 4 deletions(-) diff --git a/lib/Makefile b/lib/Makefile index c0062bf..fcc0ee6 100644 --- a/lib/Makefile +++ b/lib/Makefile @@ -1,3 +1,5 @@ +## -*- mode: Makefile -*- + LISPSTAT-SO = liblispstat.so CDISTOBJS = betabase.o bivnor.o cdists.o gamln.o gammabase.o nor.o ppnd.o \ @@ -11,7 +13,8 @@ CBAYESOBJS = cbayes.o functions.o derivatives.o minimize.o CGLUE = cffi-glue.o -CFLAGS = -g -DINTPTR -fPIC -Wall +## CFLAGS = -g -DINTPTR -fPIC -Wall +CFLAGS = -g -Wall cffi : $(LISPSTAT-SO) diff --git a/lib/functions.c b/lib/functions.c index 0b2cc3d..a6b42ec 100644 --- a/lib/functions.c +++ b/lib/functions.c @@ -688,8 +688,7 @@ maxfront(char **ff, char **gf, char **cf, c = nil; cJ = nil; cfun = nil; - } - else { + } else { c = cvals; cvals += k; makespace(&cJ, k * sizeof(double *)); diff --git a/lib/lowess.c b/lib/lowess.c index 9d229fe..01ea67b 100644 --- a/lib/lowess.c +++ b/lib/lowess.c @@ -12,7 +12,7 @@ extern int min(int, int); static double pow2(x) double x; { return(x * x); } static double pow3(x) double x; { return(x * x * x); } -static double fmax(x,y) double x, y; { return (x > y ? x : y); } +/* static */ double fmax(x,y) double x, y; { return (x > y ? x : y); } int static compar(double *a, double *b) -- 2.11.4.GIT