*** RS6000.prim.asm	Wed Jan 17 14:26:47 1996
--- /usr/local/sml/108.21/src/runtime/mach-dep/RS6000.prim.asm	Sat Jan 13 22:02:15 1996
***************
*** 310,316 ****
  	l	0, (argblock+84)(sp)
  	mtlr    0
  	l	0, (argblock+88)(sp)
! 	mtcrf	0x80, 0
  	ai	sp,sp,framesize 
  	br
  
--- 310,316 ----
  	l	0, (argblock+84)(sp)
  	mtlr    0
  	l	0, (argblock+88)(sp)
! 	mtcr    0
  	ai	sp,sp,framesize 
  	br
  
***************
*** 712,718 ****
  	ai	stdarg,stdarg,1
  	
  	andil.	0,0, 0xf
! 	mtfsf	0xff,0
  	CONTINUE
  
  floor_overflow:
--- 712,718 ----
  	ai	stdarg,stdarg,1
  	
  	andil.	0,0, 0xf
! 	mtfs	0
  	CONTINUE
  
  floor_overflow:
***************
*** 876,881 ****
  	cmp	CR0,3,ctmp1		/* done ? */
  	bbt	CR0_LT,FlushICache_1	/* repeat if < */
  
! 	mtcrf	0x80, 0			/* restore condition register */
  	br				/* return */
  
--- 876,881 ----
  	cmp	CR0,3,ctmp1		/* done ? */
  	bbt	CR0_LT,FlushICache_1	/* repeat if < */
  
! 	mtcr	0			/* restore condition register */
  	br				/* return */
  
