fixed a type cast error in DEBUG clause in spec-adjust-hl

Author: davidfrantz

src/higher-level/spec-adjust-hl.c

@@ -842,17 +842,17 @@ double pred, wpred[_SPECHOMO_N_DST_], wsum;
 
 
       #ifdef FORCE_DEBUG
-      if (p==0){
-        printf("using %d regressors\n", n_cluster);
-        for (b=0; b<_SPECHOMO_N_DST_; b++) printf("reflectance before: %04d ", 
-          ard.dat[b_dst[b]][p]); printf("\n");
-        for (b=0; b<_SPECHOMO_N_DST_; b++) printf("reflectance after:  %04d ", 
-          wpred[b] / wsum); printf("\n");
-      }
+      printf("using %d regressors\n", n_cluster);
+      printf("reflectance before:");
+      for (b=0; b<_SPECHOMO_N_DST_; b++) printf(" %04d", ard.dat[b_dst[b]][p]); 
+      printf("\n");
+      printf("reflectance after: ");
+      for (b=0; b<_SPECHOMO_N_DST_; b++) printf(" %04d", (short)(wpred[b] / wsum));
+      printf("\n");
       //ard.dat[0][p] = n_cluster;
       #endif
 
-      for (b=0; b <_SPECHOMO_N_DST_; b++) ard.dat[b_dst[b]][p] = wpred[b] / wsum;
+      for (b=0; b <_SPECHOMO_N_DST_; b++) ard.dat[b_dst[b]][p] = (short)(wpred[b] / wsum);
 
     }