include-test.h

void init();
void test();

main.c

// Silly test of using scheme as core

#include <stdio.h>
#include "test.h"

int main() {
  printf("Init\n");
  init();
  printf("test\n");
  test();
}

shell

% make
cd src && csc -e -c test.scm && clang -I../include -c init.c
libtool -static src/test.o src/init.o -o lib/libtest.a
clang -Iinclude -Llib -lchicken -ltest main.c -o test
Isaks-MacBook-Pro% ./test
Init
Initializing chickentest
zsh: segmentation fault  ./test

src-init.c

#include <chicken/chicken.h>
#include <stdio.h>
#include "test.h"

void init() {
  printf("Initializing chicken");
  if(!CHICKEN_initialize(0, 0, 0, C_toplevel)) {
    printf("Could not initialize chicken, wtf \n");
  }
}

src-itest.scm

(define-external (test) void 
  (write 'hello-world))