int main(void) { ada_analysis_context ctx; ada_analysis_unit unit; const size_t iso_8859_1_length = strlen(src_buffer_iso_8859_1); libadalang_initialize(); ctx = ada_create_analysis_context("utf-8"); if (ctx == NULL) error("Could not create the analysis context\n"); unit = ada_get_analysis_unit_from_buffer(ctx, "foo.adb", NULL, src_buffer_iso_8859_1, iso_8859_1_length); if (unit == NULL) error("Could not create the analysis unit from foo.adb"); dump_diagnostics(unit, "foo.adb"); ada_destroy_analysis_context(ctx); puts("Done"); return 0; }
static gboolean on_signal_usr1 (gpointer user_data) { #ifdef WITH_DEBUG dump_diagnostics (); #endif return TRUE; }