diff options
Diffstat (limited to 'vm_dump.c')
-rw-r--r-- | vm_dump.c | 17 |
1 files changed, 8 insertions, 9 deletions
@@ -675,22 +675,21 @@ rb_vm_bugreport(void) if (vm) { int i; VALUE name; + long len; + const int max_name_length = 1024; +# define LIMITED_NAME_LENGTH(s) \ + (((len = RSTRING_LEN(s)) > max_name_length) ? max_name_length : (int)len) name = vm->progname; - if (RB_TYPE_P(name, T_STRING)) { - fprintf(stderr, "* Loaded script: %s\n", RSTRING_PTR(name)); - } - else { - fprintf(stderr, "* Loaded script: #<%s:%p>\n", - rb_class2name(CLASS_OF(name)), (void *)name); - } + fprintf(stderr, "* Loaded script: %.*s\n", + LIMITED_NAME_LENGTH(name), RSTRING_PTR(name)); fprintf(stderr, "\n"); fprintf(stderr, "* Loaded features:\n\n"); for (i=0; i<RARRAY_LEN(vm->loaded_features); i++) { name = RARRAY_PTR(vm->loaded_features)[i]; if (RB_TYPE_P(name, T_STRING)) { - fprintf(stderr, " %4d %s\n", i, - RSTRING_PTR(name)); + fprintf(stderr, " %4d %.*s\n", i, + LIMITED_NAME_LENGTH(name), RSTRING_PTR(name)); } else { fprintf(stderr, " %4d #<%s:%p>\n", i, |