2009/01/22

[scheme][Gauche]slibのtraceを使ったデバッグ

 

Gauche(Scheme) でデバッグをする4つの方法

↑こんな記事があったのでやってみたらすごく便利。trace。

 

(define (fact n)   (if (zero? n)       1       (* n (fact (- n 1)))))  ;; => fact

(use slib) ;; => #<undef> (require 'trace) ;; => #t (trace fact) ;; => #<closure (debug:trace-procedure debug:trace-procedure)>

 

(fact 5)

 

実行結果

 

gosh> CALL fact 5 CALL fact 4   CALL fact 3    CALL fact 2     CALL fact 1     RETN fact 1    RETN fact 2   RETN fact 6 RETN fact 24 RETN fact 120 120


追記


プログラミングGauche

0 件のコメント:

コメントを投稿