* scm/music-functions.scm (make-ottava-set):

[lilypond.git] / lily / translator-scheme.cc

diff --git a/lily/translator-scheme.cc b/lily/translator-scheme.cc
index 2ced54dbf190604829883a751fc5c7bbbc32b78c..da08478faed95ea0725b5535d4547878874b11d1 100644 (file)
--- a/lily/translator-scheme.cc
+++ b/lily/translator-scheme.cc
@@ -54,7 +54,10 @@ LY_DEFINE(ly_context_property_where_defined,
   SCM_ASSERT_TYPE(tr, context, SCM_ARG1, __FUNCTION__, "Context");
   SCM_ASSERT_TYPE(gh_symbol_p (name), name, SCM_ARG2, __FUNCTION__, "symbol");
 
-  return tr->where_defined (name)->self_scm();
+
+  tr = tr->where_defined (name);
+  if (tr)
+    return tr?  tr->self_scm():  SCM_EOL;
 }
 
 LY_DEFINE(ly_unset_context_property,