diff --git a/kernel/arm/scal.c b/kernel/arm/scal.c
index 91ca76569..4ef49e293 100644
--- a/kernel/arm/scal.c
+++ b/kernel/arm/scal.c
@@ -40,6 +40,10 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da, FLOAT *x, BLAS
 {
 	BLASLONG i=0,j=0;
 
+	if ( (n <= 0) || (inc_x <= 0))
+		return(0);
+	
+
 	while(j < n)
 	{
 
diff --git a/kernel/arm/zscal.c b/kernel/arm/zscal.c
index f543edc04..0521aaa0b 100644
--- a/kernel/arm/zscal.c
+++ b/kernel/arm/zscal.c
@@ -43,6 +43,10 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r,FLOAT da_i, F
 	BLASLONG ip = 0;
 	FLOAT temp;
 
+        if ( (n <= 0) || (inc_x <= 0))
+                return(0);
+
+
 	inc_x2 = 2 * inc_x;
 	for ( i=0; i<n; i++ )
 	{