view release on metacpan or  search on metacpan

opcmsg.xs  view on Meta::CPAN

const int opc_const_OPC_SEV_MAJOR()     { return OPC_SEV_MAJOR; }
const int opc_const_OPC_SEV_CRITICAL()  { return OPC_SEV_CRITICAL; }


MODULE = Openview::Message::opcmsg  PACKAGE = Openview::Message::opcmsg	PREFIX = opc_const_

=cut
int
constant(name)
   char * name
   PPCODE:
   {
      SV      *Return;
      int     result;
      if ( (result = constant_int(name)) != 0 ) 
      {
         Return = sv_newmortal();
         sv_setiv(Return, (IV)result);	
         XPUSHs(Return);
      } else 
      {