X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finput-smob.cc;h=e3bc5d275d8f90907351184820cf01091c4cf971;hb=9f3572d98bb948c9689cd1f75401a029451fa001;hp=7f66bcd3d3ec13ba84e79d96d75da05a5b314ac6;hpb=04265f11d1f21416ccebd2dcaa1d903dc781b36e;p=lilypond.git diff --git a/lily/input-smob.cc b/lily/input-smob.cc index 7f66bcd3d3..e3bc5d275d 100644 --- a/lily/input-smob.cc +++ b/lily/input-smob.cc @@ -6,8 +6,8 @@ (c) 2000--2006 Han-Wen Nienhuys */ -#include "input.hh" -#include "source-file.hh" +#include "input-smob.hh" + #include "std-string.hh" #include "ly-smobs.icc" @@ -18,13 +18,8 @@ Input dummy_input_global; static long input_tag; static -SCM mark_smob (SCM s) +SCM mark_smob (SCM) { - Input *sc = (Input *) SCM_CELL_WORD_1 (s); - - if (Source_file *sf = sc->get_source_file ()) - return sf->self_scm (); - return SCM_EOL; }