2011-01-26 20:46:02 +00:00
|
|
|
/*
|
|
|
|
** C data arithmetic.
|
2023-08-20 19:25:30 +00:00
|
|
|
** Copyright (C) 2005-2023 Mike Pall. See Copyright Notice in luajit.h
|
2011-01-26 20:46:02 +00:00
|
|
|
*/
|
|
|
|
|
|
|
|
#ifndef _LJ_CARITH_H
|
|
|
|
#define _LJ_CARITH_H
|
|
|
|
|
|
|
|
#include "lj_obj.h"
|
|
|
|
|
|
|
|
#if LJ_HASFFI
|
|
|
|
|
|
|
|
LJ_FUNC int lj_carith_op(lua_State *L, MMS mm);
|
|
|
|
|
2013-03-13 21:44:01 +00:00
|
|
|
#if LJ_32
|
|
|
|
LJ_FUNC uint64_t lj_carith_shl64(uint64_t x, int32_t sh);
|
|
|
|
LJ_FUNC uint64_t lj_carith_shr64(uint64_t x, int32_t sh);
|
|
|
|
LJ_FUNC uint64_t lj_carith_sar64(uint64_t x, int32_t sh);
|
|
|
|
LJ_FUNC uint64_t lj_carith_rol64(uint64_t x, int32_t sh);
|
|
|
|
LJ_FUNC uint64_t lj_carith_ror64(uint64_t x, int32_t sh);
|
|
|
|
#endif
|
|
|
|
LJ_FUNC uint64_t lj_carith_shift64(uint64_t x, int32_t sh, int op);
|
|
|
|
LJ_FUNC uint64_t lj_carith_check64(lua_State *L, int narg, CTypeID *id);
|
|
|
|
|
2011-02-11 15:22:58 +00:00
|
|
|
#if LJ_32 && LJ_HASJIT
|
2011-02-02 01:29:37 +00:00
|
|
|
LJ_FUNC int64_t lj_carith_mul64(int64_t x, int64_t k);
|
|
|
|
#endif
|
2011-02-02 19:53:10 +00:00
|
|
|
LJ_FUNC uint64_t lj_carith_divu64(uint64_t a, uint64_t b);
|
|
|
|
LJ_FUNC int64_t lj_carith_divi64(int64_t a, int64_t b);
|
|
|
|
LJ_FUNC uint64_t lj_carith_modu64(uint64_t a, uint64_t b);
|
|
|
|
LJ_FUNC int64_t lj_carith_modi64(int64_t a, int64_t b);
|
2011-01-28 01:15:30 +00:00
|
|
|
LJ_FUNC uint64_t lj_carith_powu64(uint64_t x, uint64_t k);
|
|
|
|
LJ_FUNC int64_t lj_carith_powi64(int64_t x, int64_t k);
|
2011-01-26 20:46:02 +00:00
|
|
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#endif
|