Add no_naked_pointers to ocamlrun -config

ocaml · Feb 5, 2020 · 13150f4 · 13150f4
1 parent 7b7188c
commit 13150f4
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/runtime/startup_byt.c b/runtime/startup_byt.c
@@ -378,6 +378,7 @@ static void do_print_config(void)
          "supports_afl: %s\n"
          "windows_unicode: %s\n"
          "supports_shared_libraries: %s\n"
+         "no_naked_pointers: %s\n"
          "exec_magic_number: %s\n",
            OCAML_VERSION_STRING,
            caml_stat_strdup_of_os(OCAML_STDLIB_DIR),
@@ -405,6 +406,11 @@ static void do_print_config(void)
            "true",
 #else
            "false",
+#endif
+#ifdef NO_NAKED_POINTERS
+           "true",
+#else
+           "false",
 #endif
            EXEC_MAGIC);