PERFORCE change 37635 for review

[Peter Wemm]

http://perforce.freebsd.org/chv.cgi?CH=37635

Change 37635 by peter at peter_daintree on 2003/09/05 17:57:48

	Get A Bigger Hammer.

Affected files ...

.. //depot/projects/ezm3/libs/libm3/src/pickle/PickleStubs.m3#2 edit
.. //depot/projects/ezm3/libs/m3core/src/float/Common/IEEESpecial.m3#2 edit

Differences ...

==== //depot/projects/ezm3/libs/libm3/src/pickle/PickleStubs.m3#2 (text+ko) ====

@@ -287,11 +287,13 @@
     writer.wr.putString(LOOPHOLE(i, ARRAY [0..BYTESIZE(LONGREAL)-1] OF CHAR));
   END OutLongreal;
 
+(*
 PROCEDURE InExtended(reader: Pickle.Reader): EXTENDED
     RAISES {Pickle.Error, Rd.Failure, Thread.Alerted} =
   BEGIN
     RETURN LOOPHOLE(InLongreal(reader), EXTENDED);
   END InExtended;
+*)
 
 PROCEDURE OutExtended(writer: Pickle.Writer; i: EXTENDED)
    RAISES {Wr.Failure, Thread.Alerted} =

==== //depot/projects/ezm3/libs/m3core/src/float/Common/IEEESpecial.m3#2 (text+ko) ====

@@ -18,7 +18,9 @@
   LOOPHOLE (LongPosInf, LongRealRep.T) := LongRealRep.PosInf;
   LOOPHOLE (LongNan,    LongRealRep.T) := LongRealRep.Nan;
 
+(*
   LOOPHOLE (ExtdNegInf, LongRealRep.T) := LongRealRep.NegInf;
   LOOPHOLE (ExtdPosInf, LongRealRep.T) := LongRealRep.PosInf;
   LOOPHOLE (ExtdNan,    LongRealRep.T) := LongRealRep.Nan;
+*)
 END IEEESpecial.