* */*: Convert encoding from ISO 8859-1 to UTF-8.

[cln.git] / src / float / dfloat / elem / cl_DF_futrunc.cc

diff --git a/src/float/dfloat/elem/cl_DF_futrunc.cc b/src/float/dfloat/elem/cl_DF_futrunc.cc
index 35c25766523416256c505c649c890622c3499577..6a7a22765041eb7b94c9ebd25fec97744a1258eb 100644 (file)
--- a/src/float/dfloat/elem/cl_DF_futrunc.cc
+++ b/src/float/dfloat/elem/cl_DF_futrunc.cc
@@ -18,10 +18,10 @@ const cl_DF futruncate (const cl_DF& x)
 // e<=0 -> Ergebnis 1.0 oder -1.0, je nach Vorzeichen von x.
 // 1<=e<=52 -> Greife die letzten (53-e) Bits von x heraus.
 //             Sind sie alle =0 -> Ergebnis x.
-//             Sonst setze sie alle und erhöhe dann die letzte Stelle um 1.
-//             Kein Überlauf der 52 Bit -> fertig.
+//             Sonst setze sie alle und erhöhe dann die letzte Stelle um 1.
+//             Kein Überlauf der 52 Bit -> fertig.
 //             Sonst (Ergebnis eine Zweierpotenz): Mantisse := .1000...000,
-//               e:=e+1. (Test auf Überlauf wegen e<=53 überflüssig)
+//               e:=e+1. (Test auf Überlauf wegen e<=53 überflüssig)
 // e>=53 -> Ergebnis x.
 #if (cl_word_size==64)
       var dfloat x_ = TheDfloat(x)->dfloat_value;
@@ -36,13 +36,13 @@ const cl_DF futruncate (const cl_DF& x)
         { if (uexp > DF_exp_mid+DF_mant_len) // e > 52 ?
             { return x; }
             else
-            { var uint64 mask = // Bitmaske: Bits 52-e..0 gesetzt, alle anderen gelöscht
+            { var uint64 mask = // Bitmaske: Bits 52-e..0 gesetzt, alle anderen gelöscht
                 bit(DF_mant_len+1+DF_exp_mid-uexp)-1;
               if ((x_ & mask)==0) // alle diese Bits =0 ?
                 { return x; }
               return allocate_dfloat
                 ((x_ | mask) // alle diese Bits setzen
-                 + 1 // letzte Stelle erhöhen, dabei evtl. Exponenten incrementieren
+                 + 1 // letzte Stelle erhöhen, dabei evtl. Exponenten incrementieren
                 );
         }   }
 #else
@@ -60,23 +60,23 @@ const cl_DF futruncate (const cl_DF& x)
             { return x; }
             else
             if (uexp > DF_exp_mid+DF_mant_len+1-32) // e > 21 ?
-              { var uint32 mask = // Bitmaske: Bits 52-e..0 gesetzt, alle anderen gelöscht
+              { var uint32 mask = // Bitmaske: Bits 52-e..0 gesetzt, alle anderen gelöscht
                   bit(DF_mant_len+1+DF_exp_mid-uexp)-1;
                 if ((mlo & mask)==0) // alle diese Bits =0 ?
                   { return x; }
                 mlo = (mlo | mask) // alle diese Bits setzen
-                      + 1; // letzte Stelle erhöhen,
+                      + 1; // letzte Stelle erhöhen,
                 if (mlo==0) { semhi += 1; } // dabei evtl. Exponenten incrementieren
                 return allocate_dfloat(semhi,mlo);
               }
               else
-              { var uint32 mask = // Bitmaske: Bits 20-e..0 gesetzt, alle anderen gelöscht
+              { var uint32 mask = // Bitmaske: Bits 20-e..0 gesetzt, alle anderen gelöscht
                   bit(DF_mant_len+1+DF_exp_mid-32-uexp)-1;
                 if ((mlo==0) && ((semhi & mask)==0)) // alle diese Bits und mlo =0 ?
                   { return x; }
                 return allocate_dfloat
                   ((semhi | mask) // alle diese Bits setzen
-                   + 1, // letzte Stelle erhöhen, dabei evtl. Exponenten incrementieren
+                   + 1, // letzte Stelle erhöhen, dabei evtl. Exponenten incrementieren
                    0
                   );
         }     }