view release on metacpan or  search on metacpan

DevLog.xs  view on Meta::CPAN

        HV * ctlhash
    PREINIT:
        int flags;
        int res;
        struct log_ctl lc;
	char *ctlbuf;
	char *databuf;
	struct strbuf ctl, data;
        SV * sv_mid, * sv_sid, * sv_level, * sv_flags,
	  * sv_ltime, * sv_ttime, * sv_seq_no, * sv_pri;
    PPCODE:
	flags = 0;

	/* set up the control buffer */
	ctl.maxlen = ctl.len = sizeof(lc);
	ctl.buf = (char *) &lc;

	/* set up the data buffer */
	databuf = (char *)malloc(LOG_MAXPS);
	data.maxlen = LOG_MAXPS;
	data.len = 0;