lily/include/grob-interface.hh

   1 /*
   2   This file is part of LilyPond, the GNU music typesetter.
   3
   4   Copyright (C) 2002--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
   5
   6   LilyPond is free software: you can redistribute it and/or modify
   7   it under the terms of the GNU General Public License as published by
   8   the Free Software Foundation, either version 3 of the License, or
   9   (at your option) any later version.
  10
  11   LilyPond is distributed in the hope that it will be useful,
  12   but WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14   GNU General Public License for more details.
  15
  16   You should have received a copy of the GNU General Public License
  17   along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
  18 */
  19
  20 #ifndef INTERFACE_HH
  21 #define INTERFACE_HH
  22
  23 #include "lily-guile.hh"
  24
  25 class Grob;
  26
  27 #define ADD_INTERFACE(cl, b, c)                                 \
  28   Grob_interface<cl> cl ## _interface_initializer;              \
  29   template <> char const *Grob_interface<cl>::cxx_name_ (#cl);  \
  30   template <> char const *Grob_interface<cl>::description_ (b); \
  31   template <> char const *Grob_interface<cl>::variables_ (c);
  32
  33 SCM add_interface (char const *cxx_name,
  34                    char const *descr,
  35                    char const *vars);
  36
  37 SCM ly_add_interface (SCM, SCM, SCM);
  38 void internal_add_interface (SCM, SCM, SCM);
  39 SCM ly_all_grob_interfaces ();
  40
  41 template <class Interface>
  42 class Grob_interface
  43 {
  44 public:
  45   Grob_interface ()
  46   {
  47     add_scm_init_func (Grob_interface::init);
  48   }
  49
  50 private:
  51   static void init ()
  52   {
  53     interface_symbol_ = ::add_interface (cxx_name_, description_, variables_);
  54   }
  55
  56   template <class T>
  57   friend bool has_interface(Grob *);
  58
  59 private:
  60   static SCM interface_symbol_;
  61   static char const *cxx_name_;
  62   static char const *description_;
  63   static char const *variables_;
  64 };
  65
  66 template <class Interface>
  67 SCM Grob_interface<Interface>::interface_symbol_;
  68
  69 #endif /* INTERFACE_HH */
  70