From ff7e90e5db1c82cab7dc743dc2f8b7fd195754a5 Mon Sep 17 00:00:00 2001 From: David Phillips Date: Sat, 21 Jan 2017 16:59:29 +1300 Subject: Add early-days source files --- fractal-gen.c | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100644 fractal-gen.c (limited to 'fractal-gen.c') diff --git a/fractal-gen.c b/fractal-gen.c new file mode 100644 index 0000000..117e2ca --- /dev/null +++ b/fractal-gen.c @@ -0,0 +1,31 @@ +#include + +#include "trampoline.h" + +int main() { + fprintf(stderr, "Building CL trampoline... "); + if (tramp_init()) { + fprintf(stderr, "Failed.\n"); + return 1; + } + fprintf(stderr, "Done.\n"); + + fprintf(stderr, "Loading kernel source from file... "); + if (tramp_load_kernel("test.cl")) { + fprintf(stderr, "Failed.\n"); + return 1; + } + fprintf(stderr, "Loaded.\n"); + + fprintf(stderr, "Compiling kernel source... "); + if (tramp_compile_kernel()) { + fprintf(stderr, "Failed:\n%s\n", tramp_get_build_log()); + return 1; + } + fprintf(stderr, "Compiled.\n"); + + fprintf(stderr, "Destroying CL trampoline... "); + tramp_destroy(); + fprintf(stderr, "Blown to smitherines.\n"); + return 0; +} -- cgit v1.1