Exemplo n.º 1
0
// close a native library handle
void factor_vm::primitive_dlclose() {
  dll* d = untag_check<dll>(ctx->pop());
  if (d->handle != NULL)
    ffi_dlclose(d);
}
Exemplo n.º 2
0
/* close a native library handle */
inline void factorvm::vmprim_dlclose()
{
	dll *d = untag_check<dll>(dpop());
	if(d->dll != NULL)
		ffi_dlclose(d);
}