From 273489837c027a7872386ec94ac2e6bf9a5fb68f Mon Sep 17 00:00:00 2001 From: Neil Puttock Date: Wed, 19 Aug 2009 20:25:16 +0100 Subject: [PATCH] Fix indentation in guile-debugger.ly. --- ly/guile-debugger.ly | 39 +++++++++++++++++++++++---------------- 1 file changed, 23 insertions(+), 16 deletions(-) diff --git a/ly/guile-debugger.ly b/ly/guile-debugger.ly index 26179d1178..ecfaa5da2a 100644 --- a/ly/guile-debugger.ly +++ b/ly/guile-debugger.ly @@ -11,26 +11,33 @@ %% 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 proc - #:behaviour debug-trap))) - + (install-trap (make + #:procedure proc + #:behaviour debug-trap))) + #(define (trace! proc) - (install-trap (make - #:procedure proc - #:behaviour (list trace-trap - trace-at-exit)))) - + (install-trap (make + #:procedure proc + #:behaviour (list trace-trap + trace-at-exit)))) + #(define (trace-subtree! proc) - (install-trap (make - #:procedure proc - #:behaviour (list trace-trap - trace-until-exit)))) -#(module-define! (resolve-module '(guile-user)) 'lilypond-module (current-module)) + (install-trap (make + #: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) -- 2.39.5