603 	BcNum *aptr, *bptr;  in bcl_binary()  local
620 	bptr = BC_NUM(ctxt, b);  in bcl_binary()
622 	assert(aptr != NULL && bptr != NULL);  in bcl_binary()
623 	assert(aptr->num != NULL && bptr->num != NULL);  in bcl_binary()
627 	bc_num_init(&c, req(aptr, bptr, ctxt->scale));  in bcl_binary()
631 	op(aptr, bptr, &c, ctxt->scale);  in bcl_binary()
639 	if (b.i != a.i) bcl_num_dtor(ctxt, b, bptr);  in bcl_binary()
718 	BcNum *aptr, *bptr;  in bcl_divmod()  local
734 	bptr = BC_NUM(ctxt, b);  in bcl_divmod()
736 	assert(aptr != NULL && bptr != NULL);  in bcl_divmod()
737 	assert(aptr->num != NULL && bptr->num != NULL);  in bcl_divmod()
742 	req = bc_num_divReq(aptr, bptr, ctxt->scale);  in bcl_divmod()
752 	bc_num_divmod(aptr, bptr, &cnum, &dnum, ctxt->scale);  in bcl_divmod()
759 	if (b.i != a.i) bcl_num_dtor(ctxt, b, bptr);  in bcl_divmod()
792 	BcNum *aptr, *bptr, *cptr;  in bcl_modexp()  local
811 	bptr = BC_NUM(ctxt, b);  in bcl_modexp()
814 	assert(aptr != NULL && bptr != NULL && cptr != NULL);  in bcl_modexp()
815 	assert(aptr->num != NULL && bptr->num != NULL && cptr->num != NULL);  in bcl_modexp()
827 	bc_num_modexp(aptr, bptr, cptr, &d);  in bcl_modexp()
834 	if (b.i != a.i) bcl_num_dtor(ctxt, b, bptr);  in bcl_modexp()
847 	BcNum *aptr, *bptr;  in bcl_cmp()  local
855 	bptr = BC_NUM(ctxt, b);  in bcl_cmp()
857 	assert(aptr != NULL && bptr != NULL);  in bcl_cmp()
858 	assert(aptr->num != NULL && bptr->num != NULL);  in bcl_cmp()
860 	return bc_num_cmp(aptr, bptr);  in bcl_cmp()