--- cci/sys/tahoe/Kexpf.x 2019/07/28 12:24:19 1.1.1.1 +++ cci/sys/tahoe/Kexpf.x 2019/07/28 12:30:04 1.1.1.2 @@ -55,7 +55,7 @@ L29: cmpd2 4(fp),_maxf stf r0 ret L30: - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd _log2e pushd ldd 4(fp) @@ -64,7 +64,7 @@ L30: ldd r0 std 4(fp) - pushl 20(fp) # hfs + pushal 20(fp) # hfs pushl 8(fp) pushl 4(fp) callf $16,_Kfloorf @@ -73,14 +73,14 @@ L30: cvlf -88(fp) clrl r1 stf r0 - pushl 20(fp) # hfs + pushal 20(fp) # hfs pushl r1 pushl r0 ldd 4(fp) pushd callf $24,_Ksubd # (arg - ent) - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd L32 pushd ldd r0 @@ -89,41 +89,41 @@ L30: ldd r0 std -60(fp) # fract - pushl 20(fp) # hfs + pushal 20(fp) # hfs pushd pushd callf $24,_Kmuld ldd r0 std -84(fp) # xsq - pushl 20(fp) # hfs + pushal 20(fp) # hfs pushd # xsq ldd _p2 pushd callf $24,_Kmuld - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd _p1 pushd ldd r0 pushd callf $24,_Kaddd - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd -84(fp) pushd ldd r0 pushd callf $24,_Kmuld - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd _p0 pushd ldd r0 pushd callf $24,_Kaddd - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd -60(fp) # fract pushd ldd r0 @@ -132,28 +132,28 @@ L30: ldd r0 std -68(fp) # temp1 - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd -84(fp) # xsq pushd ldd _q2 pushd callf $24,_Kmuld - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd _q1 pushd ldd r0 pushd callf $24,_Kaddd - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd -84(fp) pushd ldd r0 pushd callf $24,_Kmuld - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd _q0 pushd ldd r0 @@ -162,17 +162,17 @@ L30: ldd r0 std -76(fp) # temp2 - pushl 20(fp) # hfs for Kldexpf + pushal 20(fp) # hfs for Kldexpf pushl -88(fp) # ent - pushl 20(fp) # hfs tor temp2+temp1 + pushal 20(fp) # hfs tor temp2+temp1 ldd -68(fp) # temp1 pushd ldd -76(fp) # temp2 pushd callf $24,_Kaddd - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd _sqrt2 pushd ldd r0 # temp2+temp1 @@ -181,14 +181,14 @@ L30: ldd r0 std r2 # sqrt2*(temp2+temp1) - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd -68(fp) pushd ldd -76(fp) pushd callf $24,_Ksubd # temp2-temp1 - pushl 20(fp) # hfs + pushal 20(fp) # hfs ldd r0 pushd # temp2-temp1 ldd r2 @@ -199,7 +199,7 @@ L30: pushd callf $20,_Kldexpf - #pushl 20(fp) # hfs + #pushal 20(fp) # hfs #pushl $0 #pushl r0 # cvlf r0 #pushl $0