mirror of
https://github.com/mruby/mruby
synced 2026-06-08 16:11:16 +00:00
KOBAYASHI Shuji
29ecc3840a
The following improvements are made according to Ruby's behavior:
- Match location number to index.
- Remove duplicate most recent call output.
- Fix that first call is not output when array (unpacked) backtrace.
### Example
```ruby
def a; raise "error!" end
def b; a end
begin
b
rescue => e
e.backtrace if ARGV[0] == "unpack" # unpack backtrace
raise e
end
```
#### Before this patch:
```
$ bin/mruby example.rb unpack
trace (most recent call last):
[0] example.rb:2:in b
[1] example.rb:1:in a
example.rb:1: error! (RuntimeError)
```
#### After this patch:
```
$ bin/mruby example.rb unpack
trace (most recent call last):
[2] example.rb:4
[1] example.rb:2:in b
example.rb:1:in a: error! (RuntimeError)
```
47 lines
898 B
C
47 lines
898 B
C
/*
|
|
** print.c - Kernel.#p
|
|
**
|
|
** See Copyright Notice in mruby.h
|
|
*/
|
|
|
|
#include <mruby.h>
|
|
#include <mruby/string.h>
|
|
#include <mruby/variable.h>
|
|
|
|
#ifndef MRB_DISABLE_STDIO
|
|
static void
|
|
printstr(mrb_value obj, FILE *stream)
|
|
{
|
|
if (mrb_string_p(obj)) {
|
|
fwrite(RSTRING_PTR(obj), RSTRING_LEN(obj), 1, stream);
|
|
putc('\n', stream);
|
|
}
|
|
}
|
|
#else
|
|
# define printstr(obj, stream) (void)0
|
|
#endif
|
|
|
|
MRB_API void
|
|
mrb_p(mrb_state *mrb, mrb_value obj)
|
|
{
|
|
printstr(mrb_inspect(mrb, obj), stdout);
|
|
}
|
|
|
|
MRB_API void
|
|
mrb_print_error(mrb_state *mrb)
|
|
{
|
|
mrb_print_backtrace(mrb);
|
|
}
|
|
|
|
MRB_API void
|
|
mrb_show_version(mrb_state *mrb)
|
|
{
|
|
printstr(mrb_const_get(mrb, mrb_obj_value(mrb->object_class), mrb_intern_lit(mrb, "MRUBY_DESCRIPTION")), stdout);
|
|
}
|
|
|
|
MRB_API void
|
|
mrb_show_copyright(mrb_state *mrb)
|
|
{
|
|
printstr(mrb_const_get(mrb, mrb_obj_value(mrb->object_class), mrb_intern_lit(mrb, "MRUBY_COPYRIGHT")), stdout);
|
|
}
|