CORBA-omniORB

 view release on metacpan or  search on metacpan

omniORB.xs  view on Meta::CPAN

	
		if (argv)
		    free (argv);
	    }

	    RETVAL = newSV(0);
	    sv_setref_pv(RETVAL, "CORBA::ORB",
			 (void *) CORBA::ORB::_duplicate(pomni_orb));

	    sv_setsv(weakref, RETVAL);
	    sv_rvweaken(weakref);
	}
    }
    OUTPUT:
    RETVAL

bool
is_nil (self)
    CORBA::Object self;
    CODE:
    RETVAL = CORBA::is_nil (self);

omnithreads/ppport.h  view on Meta::CPAN

sv_pvutf8n||5.006000|
sv_pvutf8||5.006000|
sv_pv||5.006000|
sv_recode_to_utf8||5.007003|
sv_reftype|||
sv_release_COW|||
sv_release_IVX|||
sv_replace|||
sv_report_used|||
sv_reset|||
sv_rvweaken||5.006000|
sv_setiv_mg|5.004050||p
sv_setiv|||
sv_setnv_mg|5.006000||p
sv_setnv|||
sv_setpv_mg|5.004050||p
sv_setpvf_mg_nocontext|||pvn
sv_setpvf_mg|5.006000|5.004000|pv
sv_setpvf_nocontext|||vn
sv_setpvf||5.004000|v
sv_setpviv_mg||5.008001|

omnithreads/shared/ppport.h  view on Meta::CPAN

sv_pvutf8n||5.006000|
sv_pvutf8||5.006000|
sv_pv||5.006000|
sv_recode_to_utf8||5.007003|
sv_reftype|||
sv_release_COW|||
sv_release_IVX|||
sv_replace|||
sv_report_used|||
sv_reset|||
sv_rvweaken||5.006000|
sv_setiv_mg|5.004050||p
sv_setiv|||
sv_setnv_mg|5.006000||p
sv_setnv|||
sv_setpv_mg|5.004050||p
sv_setpvf_mg_nocontext|||pvn
sv_setpvf_mg|5.006000|5.004000|pv
sv_setpvf_nocontext|||vn
sv_setpvf||5.004000|v
sv_setpviv_mg||5.008001|

ppport.h  view on Meta::CPAN

sv_pvutf8n||5.006000|
sv_pvutf8||5.006000|
sv_pv||5.006000|
sv_recode_to_utf8||5.007003|
sv_reftype|||
sv_release_COW|||
sv_release_IVX|||
sv_replace|||
sv_report_used|||
sv_reset|||
sv_rvweaken||5.006000|
sv_setiv_mg|5.004050||p
sv_setiv|||
sv_setnv_mg|5.006000||p
sv_setnv|||
sv_setpv_mg|5.004050||p
sv_setpvf_mg_nocontext|||pvn
sv_setpvf_mg|5.006000|5.004000|pv
sv_setpvf_nocontext|||vn
sv_setpvf||5.004000|v
sv_setpviv_mg||5.008001|

types.cc  view on Meta::CPAN

    POmniIfaceInfo *info = pomni_find_interface_description (aTHX_ repoid);
    CM_DEBUG(("converting %s objref %p to sv\n", repoid, obj));
    if (info)
	classname = (const char *)info->pkg.c_str();

    SV *rv = newSV(0);
    sv_setref_iv(rv, classname, PTR2IV((void *) obj));

    SV *weakref = newSV(0);
    sv_setsv(weakref, rv);
    sv_rvweaken(weakref);
    hv_store (pin_table, buf, n, weakref, 0);

    return rv;
}

SV *
pomni_local_objref_to_sv (pTHX_ CORBA::Object *obj,
			  const char *classname,
			  bool force)
{

types.cc  view on Meta::CPAN

	    }

	    return newSVsv(*svp);
	}
    }

    SV *rv = newSV(0);
    sv_setref_iv(rv, classname, PTR2IV((void *) obj));

    SV *weakref = newSVsv(rv);
    sv_rvweaken(weakref);
    hv_store (pin_table, buf, n, weakref, 0);

    return rv;
}

// Removes an object from the pin table
void
pomni_objref_destroy (pTHX_ CORBA::Object *obj)
{
    char buf[24];