Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!swrinde!elroy.jpl.nasa.gov!usc!wuarchive!udel!princeton!phoenix.Princeton.EDU From: tasayco@phoenix.Princeton.EDU (Maria Tasayco) Newsgroups: comp.os.minix Subject: floating point package (68000) Message-ID: <4078@idunno.Princeton.EDU> Date: 15 Nov 90 20:18:50 GMT Sender: news@idunno.Princeton.EDU Organization: Princeton University, Princeton, New Jersey Lines: 164 After sending the floating point routines I realized that I was not signaling correctly division by zero, so here you have cdiffs for the original version. I also added code to signal INVALID_OPERATION in case of comparison with at least one operand NaN (the returned value in this case is garbage) and put some more info into the exception structure, so if anybody writes his/her own exception handler will have enough information to recover. begin 644 floatdif.sh.Z M'YV0(T* >"$FC9L7<] H& &""IHTT+(*GS)@Z=(!2+7L6 MQ)TT.8L:1(@&! HW;\".29@BZ!L08ZR&B1L4#5"Z5U..2$#F31TQ9UW,<3&& M3!HS"Q.88?-FL6;.GD%/'ETZ+I[3G3^K=#@Q#$>/0!.3C$M&1T,T=4 XD;FR MQDH:.FK8T$$CQ\H<.6 H\ KGC1RP4()00;(#1/;M/0@:U$'B.Q(%G[O. =O" M#(@3E2]GWAS;S D%0MTH2. 6S>&$MOEV5T8@ ;63W*T<(<<> 'E%41;[426 M64") )]EF#%%7VHGB# =&W.4H< 8BX' P\@<#$%$D%(\4413Q@!@@_OQ9<41A A(Z%+E!AD7]-N8@ M'F.4 <=6;X@U6AAG1*1 "QPON^]+_@(\%AQRO %'&7*P@? <:9SA1AD+:VF$ MEDE0X6M)"X<(%E5>13QQ&A63Q0;&&MN PQ@W^%DI&22X45)*'+>P+!-,&V1R M2C?8$ 8.HN*0P]1,>V8'"3"D1./'_?XK5D4DFXRRRA:U_'+,3LSL1,TW*\SP MSH[1!+'$%%L\=,;+)A#31VPD, (,>-Q@AADP1!XY"V2X"H+A/R6^..5^TIB M=8F3<0/EEF/^T1V*#UMLHD)D\8461=1)N;R76X?Z"%I^&\005-!9Q!2X4C%[ MX8>7<3L1=A:9Z**-"D]&NIZKT08<"9#P1<^ ^W&%VC@?)8X^0$!!3&P00HH)X,+GJ%A(1I#Q1;F-CG@;($LE)\-7ABJ&9)A!A=(-[<3M38#&=".@;?+)QFZ-8,IC6$& M-%!A L3PLG VK23(H-!KJXXQZ5.LHE:D:^6%*:T#3]DVTHO[<:56A>E.T5@TPU$MB M2K4Y@QM\S9M299I:DQBUCN:5!%25JPW.-P,<2-2C.BW)6ON*1[<"%JYK+2P- M'IJ#='FS#'%(+$\OF![,@K6 (1.+$\+@!+9.%+,@A2QGW>/9IEHEM,(AK0)H M *@QT "B2OSK7GWJGHI,9+1. *W:8EM:QMY4JFW(BBX?:[+5CN6WI!6NR( [ M6U#:MJZY38-FJSH1,1#W!Z;%J7:9D%PV+)>J/HV(=X$+WAI,*@SXZIP]C:>X M6^5J5[V":0U"!5^(L@!?M".O\-X$N#>1YX!!A6L'YED(.%TJ!] C8O@=U@AI3$]U[-$3&,]:I8YP*I MQD?U+8MEZV+$QKBY5HX!EI^[Y1RG%+XUV*>%$7Q?#>N7!F153C=O"LZT5MFG M8B%1B(B+5! (K 4RHYG-I"M:+M^1SE-F;ESQC)@P[!FX??YSH.\VZ-<.E[HJ MU:8-W)G=[3I7RWRV]'0-?<[CCE=LYX7LC$$-:5$7NK0V"-(8-GU74WMZQM[% M,:&)&]Z\IL$.J6XNKE<3"< ,9\*C:TZ(1 MU7X=;#@8F*6I2P*QH,WA!C\8#N&3-@VH363B_>1XXEY=M*F$M(8J$;5VWNRP M:P.BP^@!98=Q-:^[C.^W@GG?$=G@'/P-\%U3-VGVNL$,;#I1W=X9FUW^:V!M MF;292IQ2;4WT;L/KV(TKH-HRH#8-F/WC9Q[)RA]!M16J;OOZ>QX MD[M;$K3\HN/L^[I=S M^ :T19JTI7SXGXI9\D(-":M)W=&2RQCQIY\\F7D->K+>0.)*K#/5A\YX/GMU MTGAS..O16?;7IZ?WD/Y]V"GM*X$__,BBI_C4+UIUQW]YT=C$ 6VWEK2]TW<$ M3FC6LV"J?4YJ_WPXN#T+T@_R45)&!OJL:D?/7?)5L@Z"@#Q1KTU+1! M%$640P/RYQAC4']F<'\ 5SC[!R0#^'\X@"]C@ ,X$"=X%70DEAXX9W0H8 8^ M- :!4R"! 0+X]P:%D709%W1FIX%%AS)^X8%A (+:(X)@48(GV'@12%84.&4%$<% M00<)9Q5[0T \@P?5\3)3Z%1Q!(,R6#%M2!%*L09ET!T5<4A.\SX\ 5PA$314 M$1B.D52$1 8A,1'5P3);,1,E!!8;.(:$E(C 9S-0X1_*!0))@!B$9$4Y 1$_ M )7T#W,Q(KF%4VL14; MU!0[& ;1P7*;5RW7TB*>URU>4P/K5UECD ,QD ,LD ,R4'CN5SGQ-T4F@S & M<8XG9!P0&1?K87])58+ZES+\MY ;Y6)C,#V:HU5;)3FD,TCT9Y%CT0-10EU1 MI8+&=U5'E56-,Y(D.7LL>5/X]I%PL%QAT#1FX%RMI1$D(A;-F(H+9A&',7\' M>$+RE9"B0@8$R)!PX)!3^$8T8!CJ 18)>)$+Z#D-"$51N5%>PTG1 0-D8) \ M&(#PMU#_)TH-2#YL>3_WEEE,H)/+)09KIP#1,6$&J3XY4%"%HY,A.9,T^93) M!(LGN94JII*\UI*/9V4R$%0BR564EW1XE)/342JN5&729=VF49X"0.K"0)UF9EI% ,ID0,]1H\W0)85 MV%']-)LD(%]38YP]R60&IH=T$#I-.7TAI9='1H_:5Y 4&#[:9IQXR9R%XYRA MHRR-57P0AG;&Z2@%$]1)"1EDCR(DBG-\RA( M:BF8PCR;DBQ_LF. P@)3LBRGDBHCU2K+ BLC]2CR%60:=J3+XG+($B7BR2S. M$BYS"@+9!@+XB"W:\B; M\QM1N!&Y\09M$!-B<4D10"#.NN'S!-ZH-\X<^$X+16C1'TWV5DD8[!36'Q@1+ M=C4G]REVM7X!ED9JQTMGN SNR(SH,>SNY@P6[TSO9 CRY,CP0RW>%[1( MF[1*N[1,V[1U)$HNT$%T$ 8+Y +YHQ\H[5/J[:'RTNO)$T*"20+Y#V* T42949D )VDLT#7(;16 M![EU<+>\J;6'*P-A2[IW.P.KFP"A^[AMN[B-^Q%8.[I\T+2ZN[N\V[M(VZ+P M%P-UA3X^LCX4]S[Q,S\L4#]<9Q-G*"'^ YHG5#% 81 %%$)Q(0>BRT!MX$ 0 M-#H35$$7- <9I(@:(;4?9$ (I+TD9$(H9+F3BSC3!$A&% .IQ$RKY$PH\T/> MQ$1.I+D%6$5NATA;E+\\]$RN=%/]Q+ESL$N1M#!N-+UQA!5TE+5=YK]\Q"/A MBP(X($C[0D6%=$5BD4C-=,#[&T:/5%5L-$D$8DF6D4DZTF,]UU(OQ6$31U]J[8EQYH MO!5SL,8-6H*55UJ%E7(I%2S-AL4QE0-D55?2)U7J6F6]-EYR;#^#3%>W1W.) MO%F+3$:-K*H1Y70S()!S:B7,E)UL!"%\NZELJEM]U6H9/7!P7&<%)%; Z75-:DS6U;<7A=Z??G36V5VW3[5S]_8(? M&()Y#' W"-,?7M5EC-Q$Q]Y)U8$W/H,Y7C([_G#IQW0&*3I_F8A*6 9,F!=/ M:!4A,HA5:!U-F(45L85=&%U?&(8988IEZ ;/>P;=N(8B@HP\1XX&-(&U##6^X>!*(54J#=S4>2(B(P;E :,Z(@B/.@20HGK"(Y"H8DXTXD1 M\8GV*8HF5.-D>+O[8I2K&(TQ XL"W!BT:(NX:!&ZN#!4T8ONR" +)Q;"V!?$ M2(?'" +[HHS,*!>9:$BE+KW4V.@@<(UID(U6GA5TD.;?>(ER$-;$5H[(>(Y3 M^S\F5#'M^(YI$(\GYYO45EF+/0)]JH_1-K-,?J[0L7XPH$+[8@1IH+V"49I* M[50OX%7>1:M^\6>%H<=LE.>CKF>Y<1:V88Y] XDDA!=-85S[,@3JWEE-.(YE MIGIZ8^\E@N^[)H=R( 884XX^)IB* MHU5<8U2?ZY@_#E="N-!;LR/K!TR!"9)%/Y-'3Y*6J_3[/*+K:03MF0;O21., M-)\V49\1PA/XJ9]9B;;^B:%>H:'V@1^.H1_\T1$(&B!V818:T: ( J$-XC<3 M*B$5>J$IZAIPWR$?$B(C4B(AJB(L0J(Q$E0HVAIO+Z!QWU H!4\AEJ]M HW7 M 0)?,#3K\06-%#@[4*EM4KHSN >H[R88:A%FZ)/NR[B9] /JM M!"2XOR^I;Q)!P_JSWR:OW\"_ORJU'T"QW_J[3_H^+ .GWQSWTGXN< ?AF !U MRC+HRGE M[V+G/_]WPP3+\@6AS]'0 >BWOP*'@=E_9" !E"DH\/\((!@!$@=0;Y4.MR6X M$H#E ("]3W45#@HH(2S@!I2 '8;:B J[4JF>P./0&7.@GA0!(5 S],2C ( N MZPO4.;0%^KZ &8 #0V (2 %U@2:@ +2($@"0#O@0.' ]G$:&D(%X(2*D+0!X M W/@#J01Y"\)#($EP"D X'I( P%) S+Q !X@SYA8>;(.'T =*@4*/U$S_"X5"Y>1(L2 A*H)$A8E5?8.2*#-N90ZI;9 *I'18'0AT$!(E9,5(0!&/!":$ * $#ID 6L MPQ<2!:?@.V2%Y2,& (G" N6>P!P< AN/"00!Y9&DZD03X%,A@$RTK+]QJEZ6 M]T 90VQ\E ]MXB-:XAN$.XPE&<"$(P M#,"!%B"%PD"&X$0$Y X\A([0:/8,STE$<* .7 2?J$'.B)6+"(G$"SK!DC@$ M?>(ER21!80B^IQA0 P(>M1(._K (^(8VQV+\8:/)"&:Q+G@@3840,9Y&!$0< MD2[ZC7$U@PZ&2+1>$<0IR@&4B )4XOUK'BTQ7[W$F(BR^DQ-1%DX\82HCY+8 M-W:A( P:.D0-@L;":!E[(B_:BE=A*'I%AN@+>U527 ,(H\XU19,X&J%BI2(" M$B,^<05+U#?J8(E(#W0!1/S&H!@(HAR!.5##N0!L314\E7H2P]Y '+8!W(%7V6A/B*NFH(DD4C>!;08J6R7NB1+3H\GA,7YV(< MX5QW,8NX![VH _FB6/2+%?+LY+ZP*%*, !18%T'@2< 0XS >@4),& E3:$3R M,R<))7$48>1G"Y$S5@SN\1 5E/@@2#N"K!!&]<$^+,N:B2#S$ 54D_'5,&!@ M?!R3=2XCH0XXR0Y1@#M\8#7P"F;!+;B]P,WSD(=]LH,!2B:(']N0_% 8J"-. M!I+9P5DBPE%DDC,R,L*,6,<'3DMF42=5!3"$A ?!N/1% C@9#H9(2H&JD@>N M0DCHD7T!2%X%O#@D"R$8-)5,,G/Y'T#)).'A/>&3+V0%MD /UH?LI)C<'GF2 M->W)T1$GZ^$2()9LQ H>1RV8+-^D^HB31@ .RD%HJ3<8)89<; L%4;X0@=@' MN>7" (" D!%FR-"6A)19KS,AE\B'V4>Q >&1L0P,#KI=IA&FT@Y?$QO2P#J M!&'%D@XF+E$ (HP![W!D883YI<3BY,%< >Y08!J34^(P)6$@D9C49(94S-@A M R!FPGQL,@ TT C>A,1*"<';%I!$:,%\% ;V!G^R"8^!U M'K$A$AM,61;/HH'!&9&R3W;)(F!$;D"EW(P?42SP3!JY*3L*:@&5%T14 C[& MY3E090)0E:S25;Y+I" K[YB0?(2&T'/DRA' )7N@"O-S0U !<+T2]?7"7GSZ ;FO3I"MVGTA0:BL#8(W48(:S