2 (require 'load-relative)
3 (load-file "./bt-helper.el")
4 (load-file "../realgud/debugger/trepan/init.el")
6 (declare-function setup-bt 'realgud-bt-helper)
7 (declare-function __FILE__ 'load-relative)
17 "--> #0 METHOD Object#gcd(a, b) in file /test/gcd.rb at line 4
18 #1 TOP Object#<top /gcd.rb> in file /test/gcd.rb
22 (with-current-buffer temp-bt
23 (switch-to-buffer temp-bt)
24 (goto-char (point-min))
27 ("#" . realgud-backtrace-number )
28 ("METHO" . font-lock-keyword-face )
29 ("Objec" . font-lock-constant-face )
30 ("#" . font-lock-function-name-face )
31 ("(" . font-lock-variable-name-face )
32 ("/test" . realgud-file-name)
33 ("line " . realgud-line-number)
34 ("#" . realgud-backtrace-number)
35 ("Objec" . font-lock-constant-face )
36 ("<top" . font-lock-variable-name-face)
37 ("/test" . realgud-file-name)
38 ("line " . realgud-line-number)
40 (search-forward (car pair))
41 (assert-equal (cdr pair)
42 (get-text-property (point) 'face))