Index: /trunk/ccl/lisp-kernel/asmutils.s
===================================================================
--- /trunk/ccl/lisp-kernel/asmutils.s	(revision 894)
+++ /trunk/ccl/lisp-kernel/asmutils.s	(revision 895)
@@ -93,8 +93,5 @@
 */
 _exportfn(C(zero_fpscr))
-	__(mr r4,r2)
-	__(mr r2,r3)
 	__(uuo_zero_fpscr())
-	__(mr r2,r4)
 	__(blr)
 _endfn