[m-dev.] diff: clpr division and \==

[Fergus Henderson]

Tyson Richard DOWD, you wrote:
> 
> One comment on this change:
> 
> > @@ -478,6 +476,8 @@
> >  
> >  bool ML_cfloat_eq(ML_svar, ML_svar);
> >  bool ML_cfloat_eq_float(ML_svar, Float);
> > +/* bool ML_cfloat_diseq(ML_svar, ML_svar, bool&); */
> > +/* bool ML_cfloat_diseq_float(ML_svar, Float, bool&); */
> >  bool ML_cfloat_gt(ML_svar, ML_svar);
> >  bool ML_cfloat_gt_float(ML_svar, Float);
> >  bool ML_cfloat_lt(ML_svar, ML_svar);
> 
> If these are just commented out because they are implemented as
> macros, it would be best to say so.

Index: /home/pgrad/fjh/mercury_sparc/extras/clpr/cfloat.m
===================================================================
RCS file: /home/mercury1/repository/clpr/cfloat.m,v
retrieving revision 1.9
diff -u -u -r1.9 cfloat.m
--- cfloat.m	1997/09/06 11:30:28	1.9
+++ cfloat.m	1997/09/07 06:28:37
@@ -474,6 +474,12 @@
 
 typedef Integer ML_svar;
 
+/*
+** The following "functions" are currently all implemented using macros.
+** (Though for many it might actually be better if they were functions...)
+** The declarations below are just documentation.
+*/
+
 bool ML_cfloat_eq(ML_svar, ML_svar);
 bool ML_cfloat_eq_float(ML_svar, Float);
 /* bool ML_cfloat_diseq(ML_svar, ML_svar, bool&); */

-- 
Fergus Henderson <fjh at cs.mu.oz.au>   |  "I have always known that the pursuit
WWW: <http://www.cs.mu.oz.au/~fjh>   |  of excellence is a lethal habit"
PGP: finger fjh at 128.250.37.3         |     -- the last words of T. S. Garp.