X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;ds=sidebyside;f=Kernel%2Farch%2Farmv7%2Fproc.S;h=44ce9eeaca1bc8bcc4e2f0a703a035d3098ccdf5;hb=1389dd6a77cfe0f01ae941f6f696bd5eda22e959;hp=4acc751f6b128879b4961f2ec9fb86e1589a28b8;hpb=25e3ce315ed2fb33a8a36b1be86b06a3fa235de8;p=tpg%2Facess2.git

diff --git a/Kernel/arch/armv7/proc.S b/Kernel/arch/armv7/proc.S
index 4acc751f..44ce9eea 100644
--- a/Kernel/arch/armv7/proc.S
+++ b/Kernel/arch/armv7/proc.S
@@ -54,6 +54,8 @@ SwitchTask:
 	ldr r1, [sp,#4*10]
 	tst r1, r1
 	mcrne p15, 0, r1, c2, c0, 0	@ Set TTBR0 to r0
+	mov r1, #0
+	mcrne p15, 0, r1, c8, c7, 0	@ Invalidate all (HACK! But it fixes things)
 
 	@ Restore SP
 	mov sp, r0
@@ -81,12 +83,12 @@ Proc_CloneInt:
 Proc_CloneInt_new:
 @	cps #18
 		
-	mov r0, #0
-	mvn r1, #0
-	bl MM_DumpTables
+@	mov r0, #0
+@	mvn r1, #0
+@	bl MM_DumpTables
 
-	ldr r0, =csProc_CloneInt_NewTaskMessage
-	bl Log
+@	ldr r0, =csProc_CloneInt_NewTaskMessage
+@	bl Log
 	
 @	cps #19
 	mov r0, #0