From 75302a4eecb3d82ca787c31e3d55d4fa7e2dc9d1 Mon Sep 17 00:00:00 2001 From: Serge Date: Fri, 27 May 2022 17:14:04 -0700 Subject: [PATCH] Implement sqrtf() as a wrapper around sqrt(), for simplicity. --- src/cmd/awk/run.c | 2 +- src/cmd/fold/fold.c | 5 +++++ src/libm/sqrt.c | 5 +++++ target.mk | 4 ++-- 4 files changed, 13 insertions(+), 3 deletions(-) diff --git a/src/cmd/awk/run.c b/src/cmd/awk/run.c index 5195149..06498b4 100644 --- a/src/cmd/awk/run.c +++ b/src/cmd/awk/run.c @@ -810,7 +810,7 @@ obj fncn(a,n) node **a; else if (t == FEXP) u = exp(getfval(x.optr)); else if (t == FSQRT) - u = 0 /* TODO: sqrt(getfval(x.optr))*/; + u = sqrt(getfval(x.optr)); else error(FATAL, "illegal function type %d", t); tempfree(x); diff --git a/src/cmd/fold/fold.c b/src/cmd/fold/fold.c index cf7722e..6742331 100644 --- a/src/cmd/fold/fold.c +++ b/src/cmd/fold/fold.c @@ -36,9 +36,13 @@ #include #include #include +#include #define DEFLINEWIDTH 80 +void fold(int width); + +int main(argc, argv) int argc; char **argv; @@ -91,6 +95,7 @@ main(argc, argv) exit(0); } +void fold(width) register int width; { diff --git a/src/libm/sqrt.c b/src/libm/sqrt.c index 8c6bdc9..2058710 100644 --- a/src/libm/sqrt.c +++ b/src/libm/sqrt.c @@ -51,3 +51,8 @@ sqrt(arg) temp = 0.5*(temp + arg/temp); return(temp); } + +float sqrtf(float arg) +{ + return sqrt(arg); +} diff --git a/target.mk b/target.mk index 2b30215..0f84ec0 100644 --- a/target.mk +++ b/target.mk @@ -38,10 +38,10 @@ ifeq ($(LLVMBIN),) $(error Unable to find any CLANG toolchain!) endif -CC = $(LLVMBIN)clang -target mipsel -mcpu=mips32r2 -mabi=o32 -mfloat-abi=soft \ +CC = $(LLVMBIN)clang -target mipsel -mcpu=mips32r2 -mabi=o32 -msoft-float \ -fomit-frame-pointer -finline-hint-functions -I$(TOPSRC)/include \ -Wno-builtin-requires-header -CXX = $(LLVMBIN)clang++ -target mipsel -mcpu=mips32r2 -mabi=o32 -mfloat-abi=soft \ +CXX = $(LLVMBIN)clang++ -target mipsel -mcpu=mips32r2 -mabi=o32 -msoft-float \ -fomit-frame-pointer -finline-hint-functions -I$(TOPSRC)/include LD = $(LLVMBIN)ld.lld -m elf32ltsmip AR = $(LLVMBIN)llvm-ar