]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/source.cc
(grob-cause): don't add cwd if path starts
[lilypond.git] / lily / source.cc
index 927469cc287a8ec4561b1e31fbad72ce03cc77f4..4cf670458a8652e1855e4ebb7403e4c4d01d764d 100644 (file)
@@ -3,23 +3,19 @@
 
   source file of the LilyPond music typesetter
 
-  (c) 1997--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
-
-#include <assert.h>
+#include "source.hh"
 
 #include "killing-cons.tcc"
-#include "string.hh"
-#include "flower-proto.hh"
 #include "source-file.hh"
-#include "source.hh"
 #include "file-path.hh"
 
 Sources::Sources ()
 {
   sourcefile_list_ = 0;
-  path_= 0;
+  path_ = 0;
   is_binary_ = false;
 }
 
@@ -36,30 +32,30 @@ Sources::set_path (File_path *f)
 }
 
 /**
-  open a file
+   open a file
 
-  @param file_string the file to be opened, name might be changed if it
-  is found in a search path. UGH!
+   @param file_string the file to be opened, name might be changed if it
+   is found in a search path. UGH!
 
-  @return 0 if no file found
-  */
-Source_file*
+   @return 0 if no file found
+*/
+Source_file *
 Sources::get_file (String &file_string) //UGH
 {
   if ((file_string != "-") && path_)
     {
-      String file_string_o = path_->find (file_string); 
+      String file_string_o = path_->find (file_string);
       if ((file_string_o == "") && (file_string != ""))
        return 0;
       file_string = file_string_o;
     }
-  Source_file * f = new Source_file (file_string) ;
+  Source_file *f = new Source_file (file_string);
   add (f);
   return f;
 }
 
 void
-Sources::add (Source_filesourcefile)
+Sources::add (Source_file *sourcefile)
 {
   sourcefile_list_ = new Killing_cons<Source_file> (sourcefile, sourcefile_list_);
 }
@@ -69,16 +65,16 @@ Sources::~Sources ()
   delete sourcefile_list_;
 }
 /**
-  search the list for file whose map contains pointer #str0#
+   search the list for file whose map contains pointer #str0#
 
-  @return 0 if not found.
-  */
-Source_file*
-Sources::get_sourcefile (char conststr0)
+   @return 0 if not found.
+*/
+Source_file *
+Sources::get_sourcefile (char const *str0)
 {
 
   for (Cons<Source_file> *i = sourcefile_list_; i; i = i->next_)
-    if (i->car_->contains (str0))      
+    if (i->car_->contains (str0))
       return i->car_;
   return 0;
 }