-
-
Notifications
You must be signed in to change notification settings - Fork 689
Expand file tree
/
Copy pathstub-realloc.ts
More file actions
30 lines (20 loc) · 833 Bytes
/
stub-realloc.ts
File metadata and controls
30 lines (20 loc) · 833 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
import { BLOCK_OVERHEAD } from "rt/common";
var ptr = __alloc(10, 0); // initial allocation
var originalPtr = ptr;
ptr = __realloc(ptr, 12); // just resizes (<= 16)
assert(ptr == originalPtr);
ptr = __realloc(ptr, 16); // just resizes (<= 16)
assert(ptr == originalPtr);
ptr = __realloc(ptr, 33); // last: resizes checking for grow (<= 48)
assert(ptr == originalPtr);
ptr = __realloc(ptr, 20); // last: shrinks again (<= 32, see *)
var newLastPtr = __alloc(1, 0);
assert(newLastPtr == originalPtr + 32 + BLOCK_OVERHEAD); // *
ptr = __realloc(ptr, 24); // just resizes (<= 32)
assert(ptr == originalPtr);
ptr = __realloc(ptr, 32); // just resizes (<= 32)
assert(ptr == originalPtr);
ptr = __realloc(ptr, 33); // not last anymore: copies
assert(ptr > originalPtr);
__free(ptr); // discards last
assert(__alloc(1, 0) == ptr);