mirror of
https://gitlab.com/80486DX2-66/gists
synced 2024-11-09 21:32:02 +05:30
floatscan-experiment.c: implement copysignl
This commit is contained in:
parent
7fae55a31e
commit
006b4ec9b2
@ -47,6 +47,7 @@
|
||||
/* wrapping code --- beginning */
|
||||
const char* fgetc_ptr = NULL;
|
||||
|
||||
static long double copysignl(long double mag, long double sgn);
|
||||
static int __shgetc(void);
|
||||
static int __shunget(void);
|
||||
static long double interface_floatscan(const char* s, int prec);
|
||||
@ -567,6 +568,10 @@ long double __floatscan(FILE *f, int prec, int pok)
|
||||
/* the original musl libc code --- end */
|
||||
|
||||
/* wrapping code --- beginning */
|
||||
static long double copysignl(long double mag, long double sgn) {
|
||||
return fabsl(mag) * (sgn < 0 ? -1 : 1);
|
||||
}
|
||||
|
||||
static int __shgetc(void) {
|
||||
return *fgetc_ptr++;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user