dawids/lang-bootstrap
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

newer version of tcc almost working

Browse source
This commit is contained in:
pommicket 2022-02-18 12:36:57 -05:00
parent c42c5d94b8
commit 826d1afd58
442 changed files with 90400 additions and 24506 deletions
Download patch file Download diff file Expand all files Collapse all files

92
05/tcc-0.9.25/ctype.h
View file

@ -1,92 +0,0 @@
#ifndef _CTYPE_H
#define _CTYPE_H
#include <stdc_common.h>
int islower(int c) {
return c >= 'a' && c <= 'z';
}
int isupper(int c) {
return c >= 'A' && c <= 'Z';
}
int isalpha(int c) {
return isupper(c) || islower(c);
}
int isalnum(int c) {
return isalpha(c) || isdigit(c);
}
int isprint(int c) {
if (isalnum(c)) return 1;
switch (c) {
case '!': return 1;
case '@': return 1;
case '#': return 1;
case '$': return 1;
case '%': return 1;
case '^': return 1;
case '&': return 1;
case '*': return 1;
case '(': return 1;
case ')': return 1;
case '-': return 1;
case '=': return 1;
case '_': return 1;
case '+': return 1;
case '`': return 1;
case '~': return 1;
case '[': return 1;
case '{': return 1;
case ']': return 1;
case '}': return 1;
case '\\': return 1;
case '|': return 1;
case ';': return 1;
case ':': return 1;
case '\'': return 1;
case '"': return 1;
case ',': return 1;
case '<': return 1;
case '.': return 1;
case '>': return 1;
case '/': return 1;
case '?': return 1;
}
return 0;
}
int iscntrl(int c) {
return !isprint(c);
}
int isgraph(int c) {
return isprint(c) && c != ' ';
}
int ispunct(int c) {
return isprint(c) && c != ' ' && !isalnum(c);
}
int isxdigit(int c) {
if (isdigit(c)) return 1;
if (c >= 'a' && c <= 'f') return 1;
if (c >= 'A' && c <= 'F') return 1;
return 0;
}
int tolower(int c) {
if (c >= 'A' && c <= 'Z')
return c - 'A' + 'a';
return c;
}
int toupper(int c) {
if (c >= 'a' && c <= 'z')
return c - 'a' + 'A';
return c;
}
#endif // _CTYPE_H