made hcl_inttooow() and hcl_oowtoint() public

This commit is contained in:
hyung-hwan 2018-02-19 16:17:46 +00:00
parent 4e4aec4f20
commit 1f4143f20f
2 changed files with 19 additions and 19 deletions

View File

@ -852,17 +852,6 @@ int hcl_isint (
hcl_oop_t x
);
int hcl_inttooow (
hcl_t* hcl,
hcl_oop_t x,
hcl_oow_t* w
);
hcl_oop_t hcl_oowtoint (
hcl_t* hcl,
hcl_oow_t w
);
hcl_oop_t hcl_addints (
hcl_t* hcl,
hcl_oop_t x,

View File

@ -1633,12 +1633,6 @@ HCL_EXPORT hcl_oop_t hcl_makefalse (
hcl_t* hcl
);
HCL_EXPORT hcl_oop_t hcl_makebigint (
hcl_t* hcl,
int brand,
const hcl_liw_t* ptr,
hcl_oow_t len
);
HCL_EXPORT hcl_oop_t hcl_makecons (
hcl_t* hcl,
@ -1708,7 +1702,6 @@ HCL_EXPORT hcl_oop_t hcl_remakengcarray (
hcl_oow_t newsz
);
HCL_EXPORT hcl_oop_t hcl_makeprim (
hcl_t* hcl,
hcl_pfimpl_t primimpl,
@ -1716,6 +1709,25 @@ HCL_EXPORT hcl_oop_t hcl_makeprim (
hcl_oow_t maxargs
);
HCL_EXPORT hcl_oop_t hcl_makebigint (
hcl_t* hcl,
int brand,
const hcl_liw_t* ptr,
hcl_oow_t len
);
HCL_EXPORT int hcl_inttooow (
hcl_t* hcl,
hcl_oop_t x,
hcl_oow_t* w
);
HCL_EXPORT hcl_oop_t hcl_oowtoint (
hcl_t* hcl,
hcl_oow_t w
);
/* =========================================================================
* CONS OBJECT UTILITIES
* ========================================================================= */
@ -1946,7 +1958,6 @@ HCL_EXPORT hcl_bch_t* hcl_dupbchars (
hcl_oow_t bcslen
);
/* =========================================================================
* ASSERTION SUPPORT
* ========================================================================= */