]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/global-context.cc
Doc: Issue 4168: Add 'Dimensions' to Useful concepts
[lilypond.git] / lily / global-context.cc
index 3b45f1d6fe150197db3764d4ba9645975355c2a3..9168f612a94e0e2d265cafeccbfa180ec5844c75 100644 (file)
@@ -92,7 +92,7 @@ IMPLEMENT_LISTENER (Global_context, prepare);
 void
 Global_context::prepare (SCM sev)
 {
-  Stream_event *ev = unsmob_stream_event (sev);
+  Stream_event *ev = Stream_event::unsmob (sev);
   Moment *mom = Moment::unsmob (ev->get_property ("moment"));
 
   assert (mom);
@@ -207,9 +207,3 @@ Global_context::get_default_interpreter (const string &/* context_id */)
   else
     return Context::get_default_interpreter ();
 }
-
-Global_context *
-unsmob_global_context (SCM x)
-{
-  return dynamic_cast<Global_context *> (Context::unsmob (x));
-}