Doc: Clarify Context creation (3006)

[lilypond.git] / lily / context-def.cc

diff --git a/lily/context-def.cc b/lily/context-def.cc
index b4e1e2567cc19397940b58e41a4852a1b9bb9ca2..1f823bf50368f747aff414b68bd6e8181c6b9b7c 100644 (file)
--- a/lily/context-def.cc
+++ b/lily/context-def.cc
@@ -93,6 +93,9 @@ Context_def::print_smob (SCM smob, SCM port, scm_print_state *)
 
   scm_puts ("#<Context_def ", port);
   scm_display (me->context_name_, port);
+  scm_puts (" ", port);
+  string loc = me->origin ()->location_string ();
+  scm_puts (loc.c_str (), port);
   scm_puts (">", port);
   return 1;
 }