work towards a simple integer vector implementationgnc

+ Hopefully shows that useful programs can be implemented with
  the rules present

+ Still missing at least external functions with non-void returns

1 files changed, 12 insertions, 0 deletions

diff --git a/mod/mem.c b/mod/mem.c
index 5303ffa..96d6d0e 100644
--- a/mod/mem.c
+++ b/mod/mem.c
@@ -24,6 +24,15 @@ long fwdfree(fwd_extern_args_t args)
 	return 0;
 }
 
+long fwdptradd(fwd_extern_args_t args)
+{
+	assert(args.argc == 2);
+	void *ptr = FWD_ARG(args, 0, void *, FWD_PTR);
+	int64_t add = FWD_ARG_T(args, 1, int64_t);
+	FWD_RET(FWD_PTR, (char *)ptr + add);
+	return 0;
+}
+
 int fwdopen(fwd_state_t *state)
 {
 	FWD_REGISTER(state, fwdmalloc,
@@ -34,5 +43,8 @@ int fwdopen(fwd_state_t *state)
 
 	FWD_REGISTER(state, fwdfree,
 			FWD_VOID, FWD_PTR);
+
+	FWD_REGISTER(state, fwdptradd,
+			FWD_PTR, FWD_PTR, FWD_T(int64_t));
 	return 0;
 }