Work at SourceForge, help us to make it a better place! We have an immediate need for a Support Technician in our San Francisco or Denver office.

Close

[83e805]: examples / embed / hello.c Maximize Restore History

Download this file

hello.c    20 lines (15 with data), 451 Bytes

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
#include <stdio.h>
#include <ecl/ecl.h>
int main (int argc, char **argv) {
/* Initialize ECL */
cl_boot(argc, argv);
/* Initialize the library we linked in. Each library
* has to be initialized. It is best if all libraries
* are joined using ASDF:MAKE-BUILD.
*/
extern void init_lib_HELLO_LISP(cl_object);
ecl_init_module(NULL, init_lib_HELLO_LISP);
cl_eval(c_string_to_object("(hello-lisp)"));
cl_shutdown();
return 0;
}