*** cif_ctonum.c.orig	Sat Apr 21 14:59:48 2001
--- cif_ctonum.c	Sat Apr 13 21:43:24 2002
***************
*** 268,274 ****
  
      for (nchar = 0; (c = strg[nchar]) && (nchar < slong); ++nchar) {
        if ( !(indptr = strchr(test,c))) return 1;
!         m = indptr - test;
          if (m < 10) {
  
          /* ....... Process the digits */
--- 268,274 ----
  
      for (nchar = 0; (c = strg[nchar]) && (nchar < slong); ++nchar) {
        if ( !(indptr = strchr(test,c))) return 1;
!         m = (int)(indptr - test);
          if (m < 10) {
  
          /* ....... Process the digits */