From 957da9056c36a5eea15c6058701f7465b31f64a8 Mon Sep 17 00:00:00 2001 From: Kimplul Date: Sun, 30 Mar 2025 22:36:53 +0300 Subject: WIP: rewrite C++ backend to be C + C allows for a bit more control, and we can manually handle closure contexts. For example `examples/fib.fwd` now works for effectively any `n`, pretty cool. + Fairly slow Fibonacci, I must admit. Initial profiling indicates it's mainly due to branch mispredictions, but I'll have to look into this a bit deeper. + The code is a bit hacked together, for now I'm more interested in getting things working, I'll worry about making things pretty later. + For testing, there's also initial support for modules, just so I can print stuff to the terminal + This commit is way too big, lol --- mod/Makefile | 4 ++++ mod/io.c | 31 +++++++++++++++++++++++++++++++ 2 files changed, 35 insertions(+) create mode 100644 mod/Makefile create mode 100644 mod/io.c (limited to 'mod') diff --git a/mod/Makefile b/mod/Makefile new file mode 100644 index 0000000..0a0c045 --- /dev/null +++ b/mod/Makefile @@ -0,0 +1,4 @@ +all: libfwdio.so + +libfwdio.so: io.c ../include/fwd/mod.h + $(CC) -I../include -fPIC -O2 -g -Wall -Wextra -shared io.c -o libfwdio.so diff --git a/mod/io.c b/mod/io.c new file mode 100644 index 0000000..380566f --- /dev/null +++ b/mod/io.c @@ -0,0 +1,31 @@ +#include +#include +#include + +#include + +long print_nl(fwd_extern_args_t args) +{ + assert(args.argc == 0); + putchar('\n'); + return 0; +} + +long print_i64(fwd_extern_args_t args) +{ + assert(args.argc == 1); + int64_t n = FWD_ARG_T(args, 0, int64_t); + printf("%lld", (long long)n); + return 0; +} + +int fwdopen(fwd_state_t *state) +{ + FWD_REGISTER(state, print_nl, + FWD_VOID); + + FWD_REGISTER(state, print_i64, + FWD_VOID, FWD_T(int64_t)); + + return 0; +} -- cgit v1.2.3