Home
last modified time | relevance | path

Searched refs:FTH_LONG_OBJECT (Results 1 – 5 of 5) sorted by relevance

/dports/lang/fth/fth-1.4.1/src/
H A Dnumbers.c922 return (fth_make_llong(FTH_LONG_OBJECT(self))); in ll_copy()
928 return (BOOL_TO_FTH(FTH_LONG_OBJECT(self) == FTH_LONG_OBJECT(obj))); in ll_equal_p()
1199 return (ficlInteger) (FTH_LONG_OBJECT(x)); in fth_integer_ref()
1222 i = (ficlInteger) FTH_LONG_OBJECT(obj); in fth_int_ref()
1259 i = (ficlInteger) FTH_LONG_OBJECT(obj); in fth_int_ref_or_else()
1288 return (FTH_LONG_OBJECT(obj)); in fth_long_long_ref()
1331 u = (ficlUnsigned) FTH_LONG_OBJECT(obj); in fth_unsigned_ref()
1417 f = (ficlFloat) FTH_LONG_OBJECT(obj); in fth_float_ref()
1459 f = (ficlFloat) FTH_LONG_OBJECT(obj); in fth_float_ref_or_else()
1505 mpi_seti(bn, FTH_LONG_OBJECT(obj)); in fth_bignum_ref()
[all …]
H A Dfth-lib.h463 #define FTH_LONG_OBJECT(Obj) FTH_INSTANCE_REF(Obj)->fcell.di macro
482 (FTH_LONG_OBJECT(Obj) = (ficl2Integer)(Val))
H A Dprintf.c1003 (FTH_LLONG_P(X) ? FTH_LONG_OBJECT(X) : (ficl2Integer)(X)))
/dports/lang/fth/fth-1.4.1/ficl/
H A Dvm.c531 FTH_LONG_OBJECT(x) += VM_STACK_LONG_REF(dataTop); \ in ficlVmInnerLoop()
770 FTH_LONG_OBJECT(x) += VM_STACK_LONG_REF(dataTop); in ficlVmInnerLoop()
H A Dprimitives.c2739 FTH_LONG_OBJECT(x) += fth_long_long_ref(fth_pop_ficl_cell(vm)); in ficlPrimitivePlusToValue()
2813 FTH_LONG_OBJECT(x) += fth_long_long_ref(fth_pop_ficl_cell(vm)); in ficlPrimitiveFPlusToValue()