1 files changed, 20 insertions, 0 deletions
diff --git a/include/08.heap/deo25 b/include/08.heap/deo25
new file mode 100644
index 0000000..1a22151
--- /dev/null
+++ b/include/08.heap/deo25
@@ -0,0 +1,20 @@
+    for (b = heap->fblock; b; b = b->next) {
+        if ((uintptr_t)ptr > (uintptr_t)b && (uintptr_t)ptr < (uintptr_t)b + sizeof(KHEAPBLOCKBM) + b->size) {
+            /* found block */
+            ptroff = (uintptr_t)ptr - (uintptr_t)&b[1];  /* get offset to get block */
+            /* block offset in BM */
+            bi = ptroff / b->bsize;
+            /* .. */
+            bm = (uint8_t*)&b[1];
+            /* clear allocation */
+            id = bm[bi];
+            /* oddly.. GCC did not optimize this */
+            max = b->size / b->bsize;
+            for (x = bi; bm[x] == id && x < max; ++x) {
+                bm[x] = 0;
+            }
+            /* update free block count */
+            b->used -= x - bi;
+            return;
+        }
+    }