+class Musicfunction
+{
+ DECLARE_SIMPLE_SMOBS (Musicfunction);
+ SCM signature_;
+ SCM function_;
+public:
+ Musicfunction (SCM signature, SCM function):
+ signature_ (signature), function_ (function) { }
+ SCM get_function () { return function_; }
+ SCM get_signature () { return signature_; }
+};
+
+IMPLEMENT_SIMPLE_SMOBS (Musicfunction);
+IMPLEMENT_DEFAULT_EQUAL_P (Musicfunction);