1 #include "file-path.hh"
10 char const *extensions
[] = {"ly", "", 0};
13 getcwd (cwd
, PATH_MAX
);
14 string ly_dir
= string (getenv ("top-src-dir")) + "/ly";
15 parse_path (string (1, PATHSEP
) + ly_dir
);
16 string file_name
= find (file
, extensions
);
17 EQUAL (file_name
.substr (file_name
.rfind ('/')), "/init.ly");
19 file_name
= find (file
, extensions
);
20 EQUAL (file_name
, ly_dir
+ "/init.ly");