From 8ee13dde4d570608eb0d8a25b7d8f4cfab93e896 Mon Sep 17 00:00:00 2001 From: Rudi Grinberg Date: Thu, 5 Apr 2018 12:20:20 +0800 Subject: [PATCH] Test compiling C program --- .../test-cases/configurator/c_test/jbuild | 5 +++++ .../test-cases/configurator/c_test/run.ml | 15 +++++++++++++++ test/blackbox-tests/test-cases/configurator/run.t | 1 + 3 files changed, 21 insertions(+) create mode 100644 test/blackbox-tests/test-cases/configurator/c_test/jbuild create mode 100644 test/blackbox-tests/test-cases/configurator/c_test/run.ml diff --git a/test/blackbox-tests/test-cases/configurator/c_test/jbuild b/test/blackbox-tests/test-cases/configurator/c_test/jbuild new file mode 100644 index 00000000..0f63b54a --- /dev/null +++ b/test/blackbox-tests/test-cases/configurator/c_test/jbuild @@ -0,0 +1,5 @@ +(jbuild_version 1) + +(executable + ((name run) + (libraries (jbuilder.configurator)))) diff --git a/test/blackbox-tests/test-cases/configurator/c_test/run.ml b/test/blackbox-tests/test-cases/configurator/c_test/run.ml new file mode 100644 index 00000000..dc3a9f08 --- /dev/null +++ b/test/blackbox-tests/test-cases/configurator/c_test/run.ml @@ -0,0 +1,15 @@ + +let () = + Configurator.main ~name:"c_test" (fun t -> + let c_result = + Configurator.c_test t {c| +#include +int main() +{ + printf("Hello, World!"); + return 0; +} +|c} in + assert c_result; + print_endline "Successfully compiled c program" + ) diff --git a/test/blackbox-tests/test-cases/configurator/run.t b/test/blackbox-tests/test-cases/configurator/run.t index 5a57e654..f726170a 100644 --- a/test/blackbox-tests/test-cases/configurator/run.t +++ b/test/blackbox-tests/test-cases/configurator/run.t @@ -1,2 +1,3 @@ $ jbuilder exec config/run.exe version is present + $ jbuilder exec c_test/run.exe \ No newline at end of file