--- ray/src/rt/aniso.c	2025/06/20 16:34:23	2.70
+++ ray/src/rt/aniso.c	2025/06/20 16:48:39	2.71
@@ -1,5 +1,5 @@
 #ifndef lint
-static const char RCSid[] = "$Id: aniso.c,v 2.70 2025/06/20 16:34:23 greg Exp $";
+static const char RCSid[] = "$Id: aniso.c,v 2.71 2025/06/20 16:48:39 greg Exp $";
 #endif
 /*
  *  Shading functions for anisotropic materials.
@@ -409,7 +409,7 @@ agaussamp(		/* sample anisotropic Gaussian specular */
 			scalescolor(scol, d);
 			saddscolor(np->rp->rcol, scol);
 		}
-		ndims--;
+		dec_ndims;
 	}
 					/* compute transmission */
 	copyscolor(sr.rcoef, np->mcolor);		/* modify by material color */
@@ -464,6 +464,6 @@ agaussamp(		/* sample anisotropic Gaussian specular */
 			saddscolor(np->rp->rcol, sr.rcol);
 			++nstaken;
 		}
-		ndims--;
+		dec_ndims;
 	}
 }