]> git.donarmstrong.com Git - lilypond.git/commitdiff
Fix indentation in guile-debugger.ly.
authorNeil Puttock <n.puttock@gmail.com>
Wed, 19 Aug 2009 19:25:16 +0000 (20:25 +0100)
committerNeil Puttock <n.puttock@gmail.com>
Wed, 19 Aug 2009 19:25:16 +0000 (20:25 +0100)
ly/guile-debugger.ly

index 26179d117846a371e2c8f7c3018bc65fc95790a6..ecfaa5da2ad1a38aea545fa503efab0cc9daf2ab 100644 (file)
 %%  For more information, see the Contributors' Guide.
 
 
-\version "2.13.0"
+\version "2.13.4"
 
-#(use-modules (ice-9 debugger) (ice-9 debugging trace) (ice-9 debugging steps) (ice-9 debugging ice-9-debugger-extensions)  )
+#(use-modules
+  (ice-9 debugger)
+  (ice-9 debugging trace)
+  (ice-9 debugging steps)
+  (ice-9 debugging ice-9-debugger-extensions))
 
 #(define (break! proc)
-       (install-trap (make <procedure-trap>
-                       #:procedure proc
-                       #:behaviour debug-trap)))
-     
+   (install-trap (make <procedure-trap>
+                   #:procedure proc
+                   #:behaviour debug-trap)))
+
 #(define (trace! proc)
-       (install-trap (make <procedure-trap>
-                       #:procedure proc
-                       #:behaviour (list trace-trap
-                                         trace-at-exit))))
-     
+   (install-trap (make <procedure-trap>
+                   #:procedure proc
+                   #:behaviour (list trace-trap
+                                     trace-at-exit))))
+
 #(define (trace-subtree! proc)
-       (install-trap (make <procedure-trap>
-                       #:procedure proc
-                       #:behaviour (list trace-trap
-                                         trace-until-exit))))
-#(module-define! (resolve-module '(guile-user)) 'lilypond-module (current-module))
+   (install-trap (make <procedure-trap>
+                   #:procedure proc
+                   #:behaviour (list trace-trap
+                                     trace-until-exit))))
+
+#(module-define! (resolve-module '(guile-user))
+                 'lilypond-module
+                 (current-module))
 #(top-repl)
 #(set-current-module lilypond-module)