shithub: mc

Info  •  Files  •  Log  •  Branches

Faster filling on free.

    Do it in chunks of size 8.

--- a/lib/std/alloc.myr

+++ b/lib/std/alloc.myr

@@ -231,9 +231,9 @@

 	var bkt

 	var b, i

-	b = p[:sz]

-	for i = 0; i < sz; i++

-		b[i] = 0xa8

+	b = (p castto(uint64#))[:sz/8]

+	for i = 0; i < sz>>3; i++

+		b[i] = 0xa8a8a8a8a8a8a8a8

 	;;

 	if (sz < Bktmax)

 		bkt = &buckets[bktnum(sz)]