Idris2-boot/tests/chez/chez013/struct.c

#include <stdlib.h>
#include <stdio.h>
#include "struct.h"

char* getString(void *p) {
    return (char*)p;
}

point* mkPoint(int x, int y) {
    point* pt = malloc(sizeof(point));
    pt->x = x;
    pt->y = y;
    return pt;
}

void freePoint(point* pt) {
    free(pt);
}

namedpoint* mkNamedPoint(char* str, point* p) {
    namedpoint* np = malloc(sizeof(namedpoint));
    np->name = str;
    np->pt = p;
    printf("Made it!\n");

    return np;
}

void freeNamedPoint(namedpoint* np) {
    free(np);
}