diff --git a/base/repl.jl b/base/repl.jl index e25cd43e3aa91..a23422fa1ab83 100644 --- a/base/repl.jl +++ b/base/repl.jl @@ -77,7 +77,7 @@ function show_backtrace(io::IO, t) :(:) #for when client.jl is not yet defined end for i = 1:length(t) - lkup = ccall(:jl_lookup_code_address, Any, (Ptr{Void},), t[i]) + lkup = ccall(:jl_lookup_code_address, Any, (Ptr{Void}, Bool), t[i], false) if lkup === () continue end diff --git a/src/task.c b/src/task.c index 523ce1d593d63..93a04a5fd6195 100644 --- a/src/task.c +++ b/src/task.c @@ -528,12 +528,12 @@ DLLEXPORT jl_value_t *jl_backtrace_from_here(void) return (jl_value_t*)bt; } -DLLEXPORT jl_value_t *jl_lookup_code_address(void *ip) +DLLEXPORT jl_value_t *jl_lookup_code_address(void *ip, int doCframes) { const char *func_name; int line_num; const char *file_name; - (void)frame_info_from_ip(&func_name, &line_num, &file_name, (size_t)ip, 0); + (void)frame_info_from_ip(&func_name, &line_num, &file_name, (size_t)ip, doCframes); if (func_name != NULL) { jl_value_t *r = (jl_value_t*)jl_alloc_tuple(3); JL_GC_PUSH(&r);