]> www.ginac.de Git - cln.git/blobdiff - src/float/lfloat/cl_LF_impl.h
Replace unused macro with cl_unused.
[cln.git] / src / float / lfloat / cl_LF_impl.h
index ad23dbe63f36139ed5b7cd0ccb89c2a0696bd02c..64b71639cf829ee7b7382315852517fe2eb00466 100644 (file)
@@ -4,10 +4,10 @@
 #define _CL_LF_IMPL_H
 
 #include "cln/number.h"
-#include "cl_LF.h"
+#include "float/lfloat/cl_LF.h"
 #include "cln/malloc.h"
-#include "cl_offsetof.h"
-#include "cl_DS.h"
+#include "base/cl_offsetof.h"
+#include "base/digitseq/cl_DS.h"
 
 namespace cln {
 
@@ -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: