Searched +defs:fixnum +defs:bits (Results 1 – 3 of 3) sorted by relevance
| /dports/lang/mit-scheme/mit-scheme-9.2/src/microcode/ |
| H A D | object.h | 317 #define MAKE_CHAR(bits, code) \ argument
327 #define FIXNUM_ZERO_P(fixnum) ((OBJECT_DATUM (fixnum)) == 0) argument
328 #define FIXNUM_NEGATIVE_P(fixnum) (((fixnum) & FIXNUM_SIGN_BIT) != 0) argument
333 #define FIXNUM_POSITIVE_P(fixnum) \ argument
336 #define UNSIGNED_FIXNUM_TO_LONG(fixnum) ((long) (OBJECT_DATUM (fixnum))) argument
349 #define FIXNUM_TO_LONG(fixnum) \ argument
356 #define FIXNUM_TO_ULONG_P(fixnum) (((OBJECT_DATUM (fixnum)) & SIGN_MASK) == 0) argument
357 #define FIXNUM_TO_ULONG(fixnum) (OBJECT_DATUM (fixnum)) argument
359 #define FIXNUM_TO_DOUBLE(fixnum) ((double) (FIXNUM_TO_LONG (fixnum))) argument
435 #define FIXNUM_TO_BIGNUM(fixnum) (long_to_bignum (FIXNUM_TO_LONG (fixnum))) argument
[all …]
|
| /dports/lang/ypsilon/ypsilon-0.9.6-update3/src/ |
| H A D | arith.cpp | 386 digit_t bits = 0; in bn_shift_right() local
416 digit_t bits = ~(DIGIT_BIT_MASK >> bit_shift); in bn_shift_right_2sc() local
445 digit_t bits = 0; in bn_shift_left() local
495 digit_t bits = denominator->elts[denominator_count - 1]; in bn_div() local
1083 uint64_t bits = datum.u64; in decode_double() local
4283 cnvt_fixnum_to_string(object_heap_t* heap, scm_fixnum_t fixnum, int radix) in cnvt_fixnum_to_string()
|
| /dports/lang/clisp/clisp-df3b9f6fdcff22832898e89a989eb499c0f842ed/src/ |
| H A D | lispbibl.d | 7358 #define record_flags_clr(ptr,bits) ((ptr)->recflags &= ~(bits)) argument
7359 #define record_flags_set(ptr,bits) ((ptr)->recflags |= (bits)) argument
7362 #define record_flags_clr(ptr,bits) ((ptr)->tfl &= ~((uintL)(bits) << 8)) argument
7363 #define record_flags_set(ptr,bits) ((ptr)->tfl |= ((uintL)(bits) << 8)) argument
8005 #define fixnum(x) type_data_object(fixnum_type,x) macro
8382 #define sstring_flags_clr(ptr,bits) ((ptr)->tfl &= ~(uintL)(bits)) argument
8383 #define sstring_flags_set(ptr,bits) ((ptr)->tfl |= (uintL)(bits)) argument
8460 #define iarray_flags_clr(ptr,bits) ((ptr)->flags &= ~(bits)) argument
8461 #define iarray_flags_set(ptr,bits) ((ptr)->flags |= (bits)) argument
8464 #define iarray_flags_clr(ptr,bits) record_flags_clr(ptr,bits) argument
[all …]
|