/*
This file is part of LilyPond, the GNU music typesetter.
- Copyright (C) 1999--2010 Jan Nieuwenhuizen <janneke@gnu.org>
+ Copyright (C) 1999--2015 Jan Nieuwenhuizen <janneke@gnu.org>
LilyPond is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
get_line (), get_word () here.
*/
-class Source_file
+class Source_file : public Smob<Source_file>
{
- vector<char const*> newline_locations_;
+public:
+ int print_smob (SCM, scm_print_state *) const;
+ SCM mark_smob () const;
+ static const char * const type_p_name_;
+ virtual ~Source_file ();
+private:
+ vector<char const *> newline_locations_;
istream *istream_;
vector<char> characters_;
SCM str_port_;
void load_stdin ();
void init_port ();
void init ();
-
- DECLARE_SMOBS (Source_file);
+
public:
- Source_file (string fn);
- Source_file (string, string);
+ Source_file (const string &fn);
+ Source_file (const string&, const string&);
char const *c_str () const;
virtual string quote_input (char const *pos_str0) const;
string name_string () const;
string file_line_column_string (char const *str0) const;
-public:
Slice line_slice (char const *pos_str0) const;
string line_string (char const *pos_str0) const;
void get_counts (char const *pos_str0, int *, int *, int *, int *) const;
-
+
SCM get_port () const;
string name_;
int line_offset_;
};
-vector<char> gulp_file (string fn, int desired);
+vector<char> gulp_file (const string &fn, int desired);
#endif /* SOURCE_FILE_HH */
-