diff --git a/libsrc/arithmetic/im_abs.c b/libsrc/arithmetic/im_abs.c
index 389a5eee..f8f645d7 100644
--- a/libsrc/arithmetic/im_abs.c
+++ b/libsrc/arithmetic/im_abs.c
@@ -99,6 +99,7 @@
 	{\
 		TYPE *p = (TYPE *) in;\
 		TYPE *q = (TYPE *) out;\
+                int x; \
 		\
 		for( x = 0; x < sz; x++ )\
 			q[x] = fabs( p[x] );\