From 5ecc14e07c5dcc40e418f450f0c34dceb7f7e326 Mon Sep 17 00:00:00 2001 From: rodri Date: Sat, 6 Mar 2021 17:11:47 +0000 Subject: implemented three integrators and a simple time stepping model. --- alloc.c | 44 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) create mode 100644 alloc.c (limited to 'alloc.c') diff --git a/alloc.c b/alloc.c new file mode 100644 index 0000000..2589e89 --- /dev/null +++ b/alloc.c @@ -0,0 +1,44 @@ +#include +#include +#include + +void* +emalloc(ulong n) +{ + void *p; + + p = malloc(n); + if(p == nil) + sysfatal("malloc: %r"); + setmalloctag(p, getcallerpc(&n)); + return p; +} + +void* +erealloc(void *p, ulong n) +{ + void *np; + + np = realloc(p, n); + if(np == nil){ + if(n == 0) + return nil; + sysfatal("realloc: %r"); + } + if(p == nil) + setmalloctag(np, getcallerpc(&p)); + else + setrealloctag(np, getcallerpc(&p)); + return np; +} + +Image* +eallocimage(Display *d, Rectangle r, ulong chan, int repl, ulong col) +{ + Image *i; + + i = allocimage(d, r, chan, repl, col); + if(i == nil) + sysfatal("allocimage: %r"); + return i; +} -- cgit v1.2.3