Commit 875b61ea authored by Ömer Sinan Ağacan's avatar Ömer Sinan Ağacan

printStackChunk: recognise a few more ret frames

parent 7271db46
...@@ -542,6 +542,18 @@ printStackChunk( StgPtr sp, StgPtr spBottom ) ...@@ -542,6 +542,18 @@ printStackChunk( StgPtr sp, StgPtr spBottom )
debugBelch("stg_ap_ppppp_info\n" ); debugBelch("stg_ap_ppppp_info\n" );
} else if (c == (StgWord)&stg_ap_pppppp_info) { } else if (c == (StgWord)&stg_ap_pppppp_info) {
debugBelch("stg_ap_pppppp_info\n" ); debugBelch("stg_ap_pppppp_info\n" );
} else if (c == (StgWord)&stg_ret_v_info) {
debugBelch("stg_ret_v_info\n" );
} else if (c == (StgWord)&stg_ret_p_info) {
debugBelch("stg_ret_p_info\n" );
} else if (c == (StgWord)&stg_ret_n_info) {
debugBelch("stg_ret_n_info\n" );
} else if (c == (StgWord)&stg_ret_f_info) {
debugBelch("stg_ret_f_info\n" );
} else if (c == (StgWord)&stg_ret_d_info) {
debugBelch("stg_ret_d_info\n" );
} else if (c == (StgWord)&stg_ret_l_info) {
debugBelch("stg_ret_l_info\n" );
#if defined(PROFILING) #if defined(PROFILING)
} else if (c == (StgWord)&stg_restore_cccs_info) { } else if (c == (StgWord)&stg_restore_cccs_info) {
debugBelch("stg_restore_cccs_info\n" ); debugBelch("stg_restore_cccs_info\n" );
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment