diff options
Diffstat (limited to 'gdb/guile')
-rw-r--r-- | gdb/guile/guile-internal.h | 5 | ||||
-rw-r--r-- | gdb/guile/scm-auto-load.c | 5 |
2 files changed, 6 insertions, 4 deletions
diff --git a/gdb/guile/guile-internal.h b/gdb/guile/guile-internal.h index 1fa60c5..c48547a 100644 --- a/gdb/guile/guile-internal.h +++ b/gdb/guile/guile-internal.h @@ -595,7 +595,10 @@ extern struct value *vlscm_convert_value_from_scheme extern objfile_script_sourcer_func gdbscm_source_objfile_script; extern objfile_script_executor_func gdbscm_execute_objfile_script; -extern int gdbscm_auto_load_enabled (const struct extension_language_defn *); +/* Return true if auto-loading Guile scripts is enabled. + This is the extension_language_script_ops.auto_load_enabled "method". */ + +extern bool gdbscm_auto_load_enabled (const struct extension_language_defn *); extern void gdbscm_preserve_values (const struct extension_language_defn *, diff --git a/gdb/guile/scm-auto-load.c b/gdb/guile/scm-auto-load.c index 4a7b2e2..569a47f 100644 --- a/gdb/guile/scm-auto-load.c +++ b/gdb/guile/scm-auto-load.c @@ -41,10 +41,9 @@ show_auto_load_guile_scripts (struct ui_file *file, int from_tty, fprintf_filtered (file, _("Auto-loading of Guile scripts is %s.\n"), value); } -/* Return non-zero if auto-loading Guile scripts is enabled. - This is the extension_language_script_ops.auto_load_enabled "method". */ +/* See guile-internal.h. */ -int +bool gdbscm_auto_load_enabled (const struct extension_language_defn *extlang) { return auto_load_guile_scripts; |