X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;f=src%2Ffloat%2Flfloat%2Fcl_LF_impl.h;h=64b71639cf829ee7b7382315852517fe2eb00466;hb=3af2cde18b3aabed4c808b0113daa81c2263b0bd;hp=ad23dbe63f36139ed5b7cd0ccb89c2a0696bd02c;hpb=11c6b0b290415e850d90115da722bb32bc9774be;p=cln.git diff --git a/src/float/lfloat/cl_LF_impl.h b/src/float/lfloat/cl_LF_impl.h index ad23dbe..64b7163 100644 --- a/src/float/lfloat/cl_LF_impl.h +++ b/src/float/lfloat/cl_LF_impl.h @@ -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: