rainlance/amiga-tz
1
0
Fork 0
mirror of https://frontier.innolan.net/rainlance/amiga-tz.git synced 2026-09-23 08:43:40 +00:00
Code Releases Activity

minor mods

Browse Source 
SCCS-file: scheck.c
SCCS-SID: 7.9
This commit is contained in:
Arthur David Olson
2012-07-18 03:01:36 -04:00
committed by Paul Eggert
parent 3cf8709496
commit 2a56ff8452
1 changed files with 9 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files
scheck.c
+9 -13
View File
@@ -32,11 +32,12 @@ char * format;
register char * result;
char dummy;
result = "";
if (string == NULL || format == NULL)
return "";
return result;
fbuf = malloc((alloc_t) (2 * strlen(format) + 4));
if (fbuf == MAL)
return "";
return result;
fp = format;
tp = fbuf;
while ((*tp++ = c = *fp++) != '\0') {
@@ -51,7 +52,7 @@ char * format;
++fp;
while (isascii(*fp) && isdigit(*fp))
*tp++ = *fp++;
if (*fp == 'l')
if (*fp == 'l' || *fp == 'h')
*tp++ = *fp++;
else if (*fp == '[')
do *tp++ = *fp++;
@@ -59,16 +60,11 @@ char * format;
if ((*tp++ = *fp++) == '\0')
break;
}
if (c != '\0')
result = "";
else {
*(tp - 1) = '%';
*tp++ = 'c';
*tp++ = '\0';
if (sscanf(string, fbuf, &dummy) == 1)
result = "";
else result = format;
}
*(tp - 1) = '%';
*tp++ = 'c';
*tp++ = '\0';
if (sscanf(string, fbuf, &dummy) != 1)
result = format;
free(fbuf);
return result;
}