11 lines
231 B
C
11 lines
231 B
C
#include <stdio.h>
|
|
#include "HsFFI.h"
|
|
|
|
extern HsInt add_one_hs(HsInt a0);
|
|
|
|
int main(int argc, char *argv[]) {
|
|
hs_init(&argc, &argv);
|
|
printf("Adding one to 5 through Haskell is %ld\n", add_one_hs(5));
|
|
hs_exit();
|
|
return 0;
|
|
}
|