]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/box.cc
Fix some bugs in the dynamic engraver and PostScript backend
[lilypond.git] / lily / box.cc
index c933c1bc05fdde4c99e0a19ae435b45e90573f18..5201ca125c922f72f9fea94f9cb712eba896f3db 100644 (file)
@@ -3,11 +3,13 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1996--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 1996--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
+#include "ly-smobs.icc"
+
 #include "box.hh"
-#include "array.hh"
+#include "std-vector.hh"
 
 void
 Box::translate (Offset o)
@@ -82,3 +84,22 @@ Box::widen (Real x, Real y)
   interval_a_[X_AXIS].widen (x);
   interval_a_[Y_AXIS].widen (y);
 }
+
+IMPLEMENT_SIMPLE_SMOBS (Box);
+IMPLEMENT_TYPE_P (Box, "ly:box?");
+IMPLEMENT_DEFAULT_EQUAL_P (Box);
+
+SCM
+Box::mark_smob (SCM x)
+{
+  (void)x;
+  return SCM_EOL;
+}
+
+int
+Box::print_smob (SCM x, SCM p, scm_print_state*)
+{
+  (void)x;
+  scm_puts ("#<Box>", p);
+  return 1;
+}