packages feed

bindings-common-0.1: src/Bindings/c.c

#include <sys/time.h>
#include <time.h>

int size_of_timeval (void)
{
    return sizeof (struct timeval);
}

void hs2c_timeval (struct timeval *p, long p1, long p2)
{
    p->tv_sec = p1;
    p->tv_usec = p2;
}

void c2hs_timeval (struct timeval *p, long *p1, long *p2)
{
    *p1 = p->tv_sec;
    *p2 = p->tv_usec;
}