%%%% This file is part of LilyPond, the GNU music typesetter.
%%%%
-%%%% Copyright (C) 2009 by Ian Hulin <ian@hulin.org.uk>
+%%%% Copyright (C) 2009--2015 by Ian Hulin <ian@hulin.org.uk>
%%%%
%%%% LilyPond is free software: you can redistribute it and/or modify
%%%% it under the terms of the GNU General Public License as published by
%% \include this file to enable the setting of breakpoints in guile.
-%% Once loaded, this file will open a guile debug prompt. Type
-%% help
-%% at the debug prompt to get a list of possible commands.
+%% Once loaded, this file will open a guile prompt. Type
+%% (debug-help)
+%% at the guile prompt to get a list of possible commands.
%% For more information, see the Contributor's Guide.
-\version "2.13.10"
+\version "2.16.0"
-% define lilypond-module as a variable in the guile-user module and set to the current
-% Scheme module (which will be the lilypond top-level
+% define lilypond-module as a variable in the guile-user module and set
+% to the current Scheme module (which will be the lilypond top-level
% module)
#(module-define! (resolve-module '(guile-user))
'lilypond-module
(current-module))
%
-% Ensure we have command-line recall available at guile> prompt
+% Ensure we have command-line recall available at the guile prompt
%
#(use-modules (ice-9 readline))
#(activate-readline)
-#(display "\n Guile debugger for Lilypond\n")
+#(display "\n Guile debugger for Lilypond")
+#(display "\n For help enter (debug-help)\n")
+%
+% Ensure debugger definitions are available in lilypond-module and guile-user
+%
#(use-modules (scm guile-debugger))
-#(newline)
+#(ly:module-copy (resolve-module '(guile-user))
+ (resolve-module '(scm guile-debugger)))
#(top-repl)
%
% top-repl has re-set the module to guile-user,