Implement ly:book? and ly:context-def? predicates

[lilypond.git] / lily / context-def.cc

diff --git a/lily/context-def.cc b/lily/context-def.cc
index 00b10f9616904e6e42e14f92e5af62fffefc064f..1bea3ea4403c33abb7f6b6e1bc81bc625fffb894 100644 (file)
--- a/lily/context-def.cc
+++ b/lily/context-def.cc
@@ -349,3 +349,6 @@ Context_def::to_alist () const
   return ell;
 }
 
+#include "ly-smobs.icc"
+
+IMPLEMENT_TYPE_P (Context_def, "ly:context-def?");