80486DX2-66/gists
1
0
Fork 0
mirror of https://gitlab.com/80486DX2-66/gists synced 2024-11-10 06:42:02 +05:30
Code

floatscan-experiment.c: implement shunget to normalize operation of the original code

Browse Source
This commit is contained in:
Intel A80486DX2-66 2024-03-02 16:12:59 +03:00
parent f411dfc6dc
commit c040b0bd44
Signed by: 80486DX2-66
GPG Key ID: 83631EF27054609B
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
c-programming/experiments/floatscan-experiment.c
View File

@ -47,11 +47,12 @@
const char* fgetc_ptr = NULL;
int __shgetc(void);
int __shunget(void);
long double floatscan(const char* s, int prec);
#define shgetc(f) __shgetc()
#define shlim(...)
#define shunget(...)
#define shunget(f) __shunget()
#define FLOAT_TYPE 0
#define DOUBLE_TYPE 1
@ -567,6 +568,11 @@ int __shgetc(void) {
return *fgetc_ptr++;
}
int __shunget(void) {
fgetc_ptr--;
return 0;
}
long double floatscan(const char* s, int prec) {
fgetc_ptr = s;
return __floatscan(NULL, prec, 1);