profiling: limit reported method instances

Cap the number of method instances we report to the profiler for a
single LLVM_MODULE_FINISH to 10.

Author: topolarity

src/jitlayers.cpp

@@ -248,9 +248,12 @@ static jl_callptr_t _jl_compile_codeinst(
         IndirectCodeinsts += emitted.size() - 1;
     }
 
+    size_t i = 0;
     for (auto &def : emitted) {
         jl_code_instance_t *this_code = def.first;
-        jl_timing_show_func_sig(this_code->def->specTypes, JL_TIMING_CURRENT_BLOCK);
+        if (i < 10)
+            jl_timing_show_func_sig(this_code->def->specTypes, JL_TIMING_CURRENT_BLOCK);
+
         jl_llvm_functions_t decls = std::get<1>(def.second);
         jl_callptr_t addr;
         bool isspecsig = false;
@@ -292,7 +295,10 @@ static jl_callptr_t _jl_compile_codeinst(
         }
         if (this_code == codeinst)
             fptr = addr;
+        i++;
     }
+    if (i > 10)
+        jl_timing_printf(JL_TIMING_CURRENT_BLOCK, "... <%d methods truncated>", i - 10);
 
     uint64_t end_time = 0;
     if (timed)

src/timing.c

@@ -187,6 +187,24 @@ JL_DLLEXPORT void jl_timing_show_func_sig(jl_value_t *v, jl_timing_block_t *cur_
 #endif
 }
 
+JL_DLLEXPORT void jl_timing_printf(jl_timing_block_t *cur_block, const char *format, ...) {
+    va_list args;
+    va_start(args, format);
+
+#ifdef USE_TRACY
+    ios_t buf;
+    ios_mem(&buf, IOS_INLSIZE);
+    buf.growable = 0; // Restrict to inline buffer to avoid allocation
+
+    jl_vprintf((JL_STREAM*)&buf, format, args);
+    if (buf.size == buf.maxsize)
+        memset(&buf.buf[IOS_INLSIZE - 3], '.', 3);
+
+    TracyCZoneText(*(cur_block->tracy_ctx), buf.buf, buf.size);
+#endif
+    va_end(args);
+}
+
 JL_DLLEXPORT int jl_timing_set_enable(const char *subsystem, uint8_t enabled) {
     for (int i = 0; i < JL_TIMING_LAST; i++) {
         if (strcmp(subsystem, jl_timing_names[i]) == 0) {

src/timing.h

@@ -33,6 +33,7 @@ void jl_destroy_timing(void) JL_NOTSAFEPOINT;
 #define jl_timing_show_filename(f, b)
 #define jl_timing_show_method_instance(mi, b)
 #define jl_timing_show_func_sig(tt, b)
+#define jl_timing_printf(s, f, ...)
 #define jl_timing_block_enter_task(ct, ptls, blk)
 #define jl_timing_block_exit_task(ct, ptls) ((jl_timing_block_t *)NULL)
 #define jl_pop_timing_block(blk)
@@ -61,6 +62,7 @@ void jl_timing_show_module(jl_module_t *m, jl_timing_block_t *cur_block);
 void jl_timing_show_filename(const char *path, jl_timing_block_t *cur_block);
 void jl_timing_show_method_instance(jl_method_instance_t *mi, jl_timing_block_t *cur_block);
 void jl_timing_show_func_sig(jl_value_t *v, jl_timing_block_t *cur_block);
+void jl_timing_printf(jl_timing_block_t *cur_block, const char *format, ...);
 
 // Update the enable bit-mask to enable/disable tracing events for
 // the subsystem in `jl_timing_names` matching the provided string.