lily/include/grob-interface.hh

   1 /*
   2   interface.hh -- declare Interface
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 2002--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7
   8  */
   9
  10 #ifndef INTERFACE_HH
  11 #define INTERFACE_HH
  12
  13 #include <libguile.h> /* SCM */
  14
  15 void add_interface (const char * symbol,
  16                     const char * descr,
  17                     const char * vars);
  18
  19 SCM ly_add_interface (SCM, SCM, SCM);
  20
  21 #define ADD_INTERFACE(cl,a,b,c) \
  22 bool cl::has_interface(Grob*me)\
  23 {\
  24   return me->internal_has_interface (ly_symbol2scm (a));\
  25 }\
  26 void cl ## _init_ifaces() {\
  27   add_interface(a,b,c);\
  28 }\
  29 ADD_SCM_INIT_FUNC(cl ## ifaces, cl ## _init_ifaces);\
  30
  31
  32 #endif /* INTERFACE_HH */
  33