Finalize CLN 1.3.7 release.

[cln.git] / src / float / lfloat / cl_LF_impl.h

diff --git a/src/float/lfloat/cl_LF_impl.h b/src/float/lfloat/cl_LF_impl.h
index 72a91efd515b9df24812fb7249fdca209aa00e93..64b71639cf829ee7b7382315852517fe2eb00466 100644 (file)
--- a/src/float/lfloat/cl_LF_impl.h
+++ b/src/float/lfloat/cl_LF_impl.h
@@ -68,12 +68,12 @@ inline cl_LF::cl_LF (cl_heap_lfloat* ptr) : cl_F ((cl_private_thing) ptr) {}
     { var Lfloat _x = TheLfloat(obj);                                  \
       var uintE uexp = _x->expo;                                       \
       if (uexp==0)                                                     \
-        { unused (mantlen_zuweisung _x->len); zero_statement } /* e=0 -> Zahl 0.0 */\
+        { cl_unused (mantlen_zuweisung _x->len); zero_statement } /* e=0 -> Zahl 0.0 */\
         else                                                           \
         { exp_zuweisung (sintE)(uexp - LF_exp_mid);    /* Exponent */  \
           sign_zuweisung _x->sign;                     /* Vorzeichen */\
-          unused (mantMSDptr_zuweisung arrayMSDptr(_x->data, (uintP)(mantlen_zuweisung _x->len))); /* Mantissen-UDS */\
-          unused (mantLSDptr_zuweisung arrayLSDptr(_x->data, (uintP)(mantlen_zuweisung _x->len))); \
+          cl_unused (mantMSDptr_zuweisung arrayMSDptr(_x->data, (uintP)(mantlen_zuweisung _x->len))); /* Mantissen-UDS */\
+          cl_unused (mantLSDptr_zuweisung arrayLSDptr(_x->data, (uintP)(mantlen_zuweisung _x->len))); \
     }   }
 
 // Einpacken eines Long-Float: