hughsando 9 лет назад
Родитель
Сommit
92f7b62684
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      gencpp.ml

+ 1 - 1
gencpp.ml

@@ -229,7 +229,7 @@ let new_context common_ctx writer debug file_info =
    ctx_cppast = Common.defined_value_safe common_ctx Define.CppAst <>"";
    ctx_calling = false;
    ctx_assigning = false;
-   ctx_debug_level = 2;
+   ctx_debug_level = debug;
    ctx_dump_src_pos = (fun() -> ());
    ctx_return_from_block = false;
    ctx_tcall_expand_args = false;