Changes in libcfa/src/rational.hfa [fd54fef:0087e0e]

File:

• libcfa/src/rational.hfa (modified) (4 diffs)

libcfa/src/rational.hfa

@@ -20 +20 @@
 #include "iostream.hfa"
 
-trait scalar( T ) {
+trait scalar( otype T ) {
 };
 
-trait arithmetic( T | scalar( T ) ) {
+trait arithmetic( otype T | scalar( T ) ) {
         int !?( T );
         int ?==?( T, T );
@@ -46 +46 @@
 // implementation
 
-forall( RationalImpl | arithmetic( RationalImpl ) ) {
+forall( otype RationalImpl | arithmetic( RationalImpl ) ) {
         struct Rational {
                 RationalImpl numerator, denominator;                    // invariant: denominator > 0
@@ -89 +89 @@
 
         // I/O
-        forall( istype & | istream( istype ) | { istype & ?|?( istype &, RationalImpl & ); } )
+        forall( dtype istype | istream( istype ) | { istype & ?|?( istype &, RationalImpl & ); } )
         istype & ?|?( istype &, Rational(RationalImpl) & );
 
-        forall( ostype & | ostream( ostype ) | { ostype & ?|?( ostype &, RationalImpl ); } ) {
+        forall( dtype ostype | ostream( ostype ) | { ostype & ?|?( ostype &, RationalImpl ); } ) {
                 ostype & ?|?( ostype &, Rational(RationalImpl) );
                 void ?|?( ostype &, Rational(RationalImpl) );
@@ -98 +98 @@
 } // distribution
 
-forall( RationalImpl | arithmetic( RationalImpl ) |{RationalImpl ?\?( RationalImpl, unsigned long );} )
+forall( otype RationalImpl | arithmetic( RationalImpl ) |{RationalImpl ?\?( RationalImpl, unsigned long );} )
 Rational(RationalImpl) ?\?( Rational(RationalImpl) x, long int y );
 
 // conversion
-forall( RationalImpl | arithmetic( RationalImpl ) | { double convert( RationalImpl ); } )
+forall( otype RationalImpl | arithmetic( RationalImpl ) | { double convert( RationalImpl ); } )
 double widen( Rational(RationalImpl) r );
-forall( RationalImpl | arithmetic( RationalImpl ) | { double convert( RationalImpl );  RationalImpl convert( double );} )
+forall( otype RationalImpl | arithmetic( RationalImpl ) | { double convert( RationalImpl );  RationalImpl convert( double );} )
 Rational(RationalImpl) narrow( double f, RationalImpl md );