Update examples

This commit is contained in:
Don Stewart
2005-09-03 04:45:14 +00:00
parent 5321754614
commit dff0363224
421 changed files with 19 additions and 9 deletions

View File

@ -0,0 +1,2 @@
TOP=../../..
include ../../foreign.mk

View File

@ -0,0 +1 @@
run a string of Haskell code from a C program.

View File

View File

@ -0,0 +1 @@
10946

View File

@ -0,0 +1,16 @@
#include <stdio.h>
#include "EvalHaskell.h"
int main(int argc, char *argv[])
{
int *p;
hs_init(&argc, &argv);
p = hs_eval_i("let fibs = 1:1:zipWith (+) fibs (tail fibs) in fibs !! 20 :: Int");
if (p == NULL)
printf("failed!\n");
else
printf("%d\n",*p);
hs_exit();
return 0;
}