Lỗi gỡ lỗi: Hiển thị tên của hàm tại mỗi cuộc gọi

Question

Có công cụ tự động "đánh dấu" một số chức năng để tôi có thể nhận được xấp xỉ "ngăn xếp cuộc gọi" hay không.

Thực ra, tôi muốn có một hành vi tương tự như cách bạn nhận được bằng cách viết fct = Debug.trace "fct" $ ... mà không cần phải thêm nó trước mỗi chức năng.

Tôi biết rằng lược tả thực hiện điều gì đó tương tự với -fprof-auto, nhưng tôi cần nó được hiển thị trong khi ứng dụng đang chạy.

Một thời gian, tôi có vòng lặp vô hạn và việc hiển thị này có thể hiển thị cho tôi ngay lập tức chức năng nào bị lỗi. Sử dụng hlist và breakpoint không thực sự hữu ích vì bạn đã phải biết tên của một trong các hàm trong chu trình.

Answer 1

Đây là điều cực kỳ xấu xí ;-), và nó chỉ cung cấp cho bạn số dòng thay vì tên hàm, nhưng tôi ngạc nhiên khi biết rằng nó hoạt động, vì vậy tôi nghĩ tôi sẽ chia sẻ nó. Và nó vẫn tốt hơn là không có gì. Bạn có thể sử dụng tiền xử lý C giống như trong tốt ngày C cũ:

{-# LANGUAGE CPP #-} 

#define traceLoc trace (__FILE__ ++":"++ show __LINE__) 

import Debug.Trace 

f 0 = traceLoc $ 1 
f n = traceLoc $ g (n-1) 
g 0 = traceLoc $ 2 
g n = traceLoc $ 2 * f (n-1)  

Bây giờ,

*Main> f 3 
Test.hs:16 
Test.hs:18 
Test.hs:16 
Test.hs:17 
4