Mercurial > hg > xemacs-beta
comparison src/lread.c @ 400:a86b2b5e0111 r21-2-30
Import from CVS: tag r21-2-30
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:14:34 +0200 |
parents | 74fd4e045ea6 |
children | 2f8bb876ab1d |
comparison
equal
deleted
inserted
replaced
399:376370fb5946 | 400:a86b2b5e0111 |
---|---|
981 const char *nsuffix = (const char *) XSTRING_DATA (suffixes); | 981 const char *nsuffix = (const char *) XSTRING_DATA (suffixes); |
982 | 982 |
983 while (1) | 983 while (1) |
984 { | 984 { |
985 char *esuffix = (char *) strchr (nsuffix, ':'); | 985 char *esuffix = (char *) strchr (nsuffix, ':'); |
986 int lsuffix = ((esuffix) ? (esuffix - nsuffix) : strlen (nsuffix)); | 986 int lsuffix = esuffix ? esuffix - nsuffix : strlen (nsuffix); |
987 | 987 |
988 /* Concatenate path element/specified name with the suffix. */ | 988 /* Concatenate path element/specified name with the suffix. */ |
989 strncpy (fn + fn_len, nsuffix, lsuffix); | 989 strncpy (fn + fn_len, nsuffix, lsuffix); |
990 fn[fn_len + lsuffix] = 0; | 990 fn[fn_len + lsuffix] = 0; |
991 | 991 |