Add ast-traverse helper
[scheme.git] / rts.c
1 #include <stdio.h>
2 #include <stdlib.h>
3
4 __attribute__((__cdecl__))
5 extern int scheme_entry();
6
7 int main(int argc, const char**argv) {
8   int val = scheme_entry();
9   printf("%d\n", val);
10   return 0;
11 }