X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=Kernel%2Fheap.c;h=e5a37232faa12cbed0adcc1c5d4a0b8403901456;hb=414fb447e4ab5d4f8f456a8de2a16b77eeb1df90;hp=fce510cdf9b97dd961a5430a92ef8eed7c865542;hpb=8bc40333b1401d7616b225945fee53d972c2f418;p=tpg%2Facess2.git

diff --git a/Kernel/heap.c b/Kernel/heap.c
index fce510cd..e5a37232 100644
--- a/Kernel/heap.c
+++ b/Kernel/heap.c
@@ -234,6 +234,9 @@ void free(void *Ptr)
 	tHeapHead	*head;
 	tHeapFoot	*foot;
 	
+	LOG("Ptr = %p", Ptr);
+	LOG("Returns to %p", __builtin_return_address(0));
+	
 	// Alignment Check
 	if( (Uint)Ptr & (sizeof(Uint)-1) ) {
 		Warning("free - Passed a non-aligned address (%p)\n", Ptr);