Home
last modified time | relevance | path

Searched refs:FIXNUM_TO_LONG (Results 1 – 14 of 14) sorted by relevance

/dports/lang/mit-scheme/mit-scheme-9.2/src/microcode/
H A Dartutl.c37 return (FIXNUM_TO_LONG (fixnum)); in fixnum_to_long()
336 ? (long_to_integer ((FIXNUM_TO_LONG (n)) + (FIXNUM_TO_LONG (m)))) in integer_add()
357 ? (long_to_integer ((FIXNUM_TO_LONG (n)) - (FIXNUM_TO_LONG (m)))) in integer_subtract()
401 long lx = (FIXNUM_TO_LONG (n)); in integer_divide()
402 long ly = (FIXNUM_TO_LONG (d)); in integer_divide()
459 long lx = (FIXNUM_TO_LONG (n)); in integer_quotient()
460 long ly = (FIXNUM_TO_LONG (d)); in integer_quotient()
493 long lx = (FIXNUM_TO_LONG (n)); in integer_remainder()
494 long ly = (FIXNUM_TO_LONG (d)); in integer_remainder()
580 long x = ((FIXNUM_TO_LONG (n)) ^ (FIXNUM_TO_LONG (m))); in integer_hamming_distance()
[all …]
H A Dmul.c55 long A = (FIXNUM_TO_LONG (Arg1)); in Mul()
56 long B = (FIXNUM_TO_LONG (Arg2)); in Mul()
213 A = (FIXNUM_TO_LONG (Arg1)); in Mul()
214 B = (FIXNUM_TO_LONG (Arg2)); in Mul()
H A Dgeneric.c66 return (long_to_integer ((FIXNUM_TO_LONG (x)) op 1)); \
104 return (long_to_integer ((FIXNUM_TO_LONG (x)) op \
105 (FIXNUM_TO_LONG (y)))); \
H A Dobject.h331 #define FIXNUM_LESS_P(x, y) ((FIXNUM_TO_LONG (x)) < (FIXNUM_TO_LONG (y)))
349 #define FIXNUM_TO_LONG(fixnum) \ macro
359 #define FIXNUM_TO_DOUBLE(fixnum) ((double) (FIXNUM_TO_LONG (fixnum)))
435 #define FIXNUM_TO_BIGNUM(fixnum) (long_to_bignum (FIXNUM_TO_LONG (fixnum)))
H A Dliarc.h72 #undef FIXNUM_TO_LONG
73 #define FIXNUM_TO_LONG(source) \ macro
H A Dextern.c195 arity = (FIXNUM_TO_LONG (arity_arg));
H A Dfixnum.c42 return (FIXNUM_TO_LONG (argument)); in arg_fixnum()
H A Ddebug.c389 outf (stream, "%ld", ((long) (FIXNUM_TO_LONG (Expr)))); in do_printing()
580 ((long) (FIXNUM_TO_LONG (PAIR_CDR (filename))))); in do_printing()
H A Dprimutl.c515 long arity = (FIXNUM_TO_LONG (*entries++)); in import_primitive_table()
H A Dpros2pm.c645 (scan_points -> x) = (FIXNUM_TO_LONG (x)); in coordinate_vector_point_args()
646 (scan_points -> y) = (FIXNUM_TO_LONG (y)); in coordinate_vector_point_args()
H A Dsyntax.c799 depth = (FIXNUM_TO_LONG (temp));
H A Dsvm1-interp.c1166 DEFINE_UNARY_WR (fixnum_to_integer, FIXNUM_TO_INTEGER, FIXNUM_TO_LONG) in DEFINE_UNARY_WR()
1211 : FIXNUM_TO_LONG (ans));
H A Dx11base.c2427 ? (FIXNUM_TO_LONG (ARG_REF (3)))
/dports/lang/mit-scheme/mit-scheme-9.2/src/microcode/cmpauxmd/
H A Dc.c274 long dumped_initial_entry_number = (FIXNUM_TO_LONG (*table++)); in import_c_code_table()
622 (*res) = (FIXNUM_TO_LONG (ans)); in multiply_with_overflow()