diff options
Diffstat (limited to 'libinterp/heap.c')
| -rw-r--r-- | libinterp/heap.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libinterp/heap.c b/libinterp/heap.c index 1ac715f7..7da4b2df 100644 --- a/libinterp/heap.c +++ b/libinterp/heap.c @@ -158,7 +158,7 @@ freelist(Heap *h, int swept) l = l->tail; while(l != (List*)H) { t = l->t; - th = D2H((ulong)l); + th = D2H(l); if(th->ref-- != 1) break; th->t->ref--; /* should be &Tlist and ref shouldn't go to 0 here nor be 0 already */ @@ -242,7 +242,7 @@ dtype(void (*destroy)(Heap*, int), int size, uchar *map, int mapsize) { Type *t; - t = malloc(sizeof(Type)+mapsize); + t = malloc(sizeof(Type)-sizeof(t->map)+mapsize); if(t != nil) { t->ref = 1; t->free = destroy; |