view release on metacpan or  search on metacpan

Lirc/Lirc.xs  view on Meta::CPAN

        RETVAL

void
lirc_freeconfig()
	CODE:
        if (config)
          lirc_freeconfig (config);

void
_get_code()
        PPCODE:
        char *code;

        if (lirc_nextcode (&code) != 0)
          croak ("communication error with lircd");

        if (code)
          {
            char *text;
            
            if (!config || lirc_code2char (config, code, &text) != 0)