#include <sstream>
#else
#include <strstream>
-#define istringstream(x) istrstream (x, length ())
#endif
using namespace std;
#include "misc.hh"
#include "warn.hh"
+#if HAVE_SSTREAM
+using std::istringstream;
+#else
+#define istringstream(x) std::istrstream (x, length ())
+#endif
+
+using std::istream;
+using std::string;
+using std::vector;
+
void
Source_file::load_stdin ()
{
const char Source_file::type_p_name_[] = "ly:source-file?";
SCM
-Source_file::mark_smob ()
+Source_file::mark_smob () const
{
return str_port_;
}
int
-Source_file::print_smob (SCM port, scm_print_state *)
+Source_file::print_smob (SCM port, scm_print_state *) const
{
scm_puts ("#<Source_file ", port);
scm_puts (name_.c_str (), port);