rainlance/amiga-tz
1
0
Fork 0
mirror of https://frontier.innolan.net/rainlance/amiga-tz.git synced 2025-11-23 05:01:33 +00:00
Code Releases Activity

eggert mods

Browse Source 
SCCS-file: date.c
SCCS-SID: 7.30
This commit is contained in:
Arthur David Olson
1995-10-30 10:19:59 -05:00
committed by Paul Eggert
parent 10069705d7
commit 5c316b13e3
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
date.c
View File

@ -459,7 +459,7 @@ static const char *
nondigit(cp) nondigit(cp)
register const char * cp; register const char * cp;
{ {
while (isdigit(*cp)) while (is_digit(*cp))
++cp; ++cp;
return cp; return cp;
} }
@ -592,7 +592,7 @@ const time_t t;
dotp = strchr(value, '.'); dotp = strchr(value, '.');
for (cp = value; *cp != '\0'; ++cp) for (cp = value; *cp != '\0'; ++cp)
if (!isdigit(*cp) && cp != dotp) if (!is_digit(*cp) && cp != dotp)
wildinput("time", value, "contains a nondigit"); wildinput("time", value, "contains a nondigit");
if (dotp == NULL) if (dotp == NULL)