tests: catch exceptions

Running tests with beam didn't catch exceptions which
resulted in command failing with non-informational error.

Now, we catch all exceptions, print them, and exit with error code.

Signed-off-by: Jakub Gonet <jakub.gonet@swmansion.com>

Author: jgonet

tests/test.c

@@ -634,18 +634,23 @@ static int test_atom(struct Test *test)
 static int test_beam(struct Test *test)
 {
     char command[512];
-    snprintf(command, sizeof(command),
+    size_t written = snprintf(command, sizeof(command),
         "erl -pa . -eval '"
-        "erlang:process_flag(trap_exit, false), " /* init(3) traps exists */
-        "R = %s:start(), "
-        "S = if"
-        " R =:= %i -> 0;"
-        " true -> io:format(\"Expected ~B, got ~p\n\", [%i, R]) "
-        "end, "
+        "erlang:process_flag(trap_exit, false), \n" /* init(3) traps exits */
+        "S = try %s:start() of\n"
+        "    R when R =:= %i -> 0;\n"
+        "    R               -> io:format(\"Expected ~B, got ~p\\n\", [%i, R]), 1\n"
+        "catch\n"
+        "    _C:E:ST -> io:format(\"Raised ~p, stacktrace:\\n~p\\n\", [E, ST]), 1\n"
+        "end,\n"
         "erlang:halt(S).' -noshell",
         test->test_module,
         test->expected_value,
         test->expected_value);
+    if (written >= sizeof(command) - 1) {
+        fprintf(stderr, "Exceeded buffer size for module %s\n", test->test_module);
+        return 1;
+    }
     return system(command);
 }