Date: Fri, 5 Sep 2003 19:09:09 -0700 (PDT) From: Peter Wemm <peter@FreeBSD.org> To: Perforce Change Reviews <perforce@freebsd.org> Subject: PERFORCE change 37638 for review Message-ID: <200309060209.h862992N085549@repoman.freebsd.org>
next in thread | raw e-mail | index | archive | help
http://perforce.freebsd.org/chv.cgi?CH=37638 Change 37638 by peter@peter_daintree on 2003/09/05 19:08:30 back out Affected files ... .. //depot/projects/ezm3/libs/libm3/src/pickle/PickleStubs.m3#3 edit .. //depot/projects/ezm3/libs/libm3/src/random/IEEE/RandomReal.m3#3 edit Differences ... ==== //depot/projects/ezm3/libs/libm3/src/pickle/PickleStubs.m3#3 (text+ko) ==== @@ -287,13 +287,11 @@ 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/libm3/src/random/IEEE/RandomReal.m3#3 (text+ko) ==== @@ -88,7 +88,7 @@ PROCEDURE Extended (r: Random.T): EXTENDED = BEGIN - RETURN LOOPHOLE (Extended (r), EXTENDED); + RETURN LOOPHOLE (LongReal (r), EXTENDED); END Extended; BEGIN
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?200309060209.h862992N085549>