added some pascal wrapper files
All checks were successful
continuous-integration/drone/push Build is passing
All checks were successful
continuous-integration/drone/push Build is passing
This commit is contained in:
12
lib/fmt.c
12
lib/fmt.c
@ -1865,6 +1865,12 @@ static int print_bcs (hcl_fmtout_t* fmtout, const hcl_bch_t* ptr, hcl_oow_t len)
|
||||
#else
|
||||
hcl_bch_t* optr;
|
||||
|
||||
if (HCL_UNLIKELY(!hcl->io.udo_wrtr))
|
||||
{
|
||||
hcl_seterrmsg (hcl, HCL_EINVAL, "no user-defined output handler");
|
||||
return -1;
|
||||
}
|
||||
|
||||
optr = (hcl_bch_t*)ptr;
|
||||
while (len > 0)
|
||||
{
|
||||
@ -1887,6 +1893,12 @@ static int print_ucs (hcl_fmtout_t* fmtout, const hcl_uch_t* ptr, hcl_oow_t len)
|
||||
{
|
||||
hcl_t* hcl = (hcl_t*)fmtout->ctx;
|
||||
|
||||
if (HCL_UNLIKELY(!hcl->io.udo_wrtr))
|
||||
{
|
||||
hcl_seterrmsg (hcl, HCL_EINVAL, "no user-defined output handler");
|
||||
return -1;
|
||||
}
|
||||
|
||||
#if defined(HCL_OOCH_IS_UCH)
|
||||
hcl_uch_t* optr;
|
||||
|
||||
|
Reference in New Issue
Block a user