X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fcontext-mod.hh;h=81b1f34e36c47189b543eda186e84dbf66e6fb98;hb=4934b315013ccdda3ab42271fa8bed6e45587844;hp=ed31be492d76c518feecc9176f9f9c31786e25cb;hpb=f296029dcb6cc6dedc364847392f2ab3862e7a28;p=lilypond.git

diff --git a/lily/include/context-mod.hh b/lily/include/context-mod.hh
index ed31be492d..81b1f34e36 100644
--- a/lily/include/context-mod.hh
+++ b/lily/include/context-mod.hh
@@ -1,7 +1,7 @@
 /*
   This file is part of LilyPond, the GNU music typesetter.
 
-  Copyright (C) 2010--2011 Reinhold Kainhofer <reinhold@kainhofer.com>
+  Copyright (C) 2010--2015 Reinhold Kainhofer <reinhold@kainhofer.com>
 
   LilyPond is free software: you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
@@ -34,25 +34,23 @@
   Modifications for an interpretation context as given in the
   input.
 */
-struct Context_mod
+struct Context_mod : public Simple_smob<Context_mod>
 {
+  SCM mark_smob () const;
+  int print_smob (SCM, scm_print_state *) const;
+  static const char * const type_p_name_;
 private:
   SCM mods_;
 public:
   void add_context_mod (SCM);
   void add_context_mods (SCM);
 
-  VIRTUAL_COPY_CONSTRUCTOR (Context_mod, Context_mod);
-
   SCM get_mods () const;
 
   Context_mod ();
   Context_mod (Context_mod const &);
   Context_mod (SCM mod_list);
-  DECLARE_SIMPLE_SMOBS (Context_mod);
 };
 
-DECLARE_UNSMOB (Context_mod, context_mod);
 
 #endif /* CONTEXT_MOD_HH */
-