Skip to content

Commit ce2e04c

Browse files
authored
Merge pull request #5 from codinuum/develop
some search paths added
2 parents 4d410ac + 052afc6 commit ce2e04c

File tree

1 file changed

+9
-3
lines changed

1 file changed

+9
-3
lines changed

src/ast/analyzing/common/parser_options.ml

Lines changed: 9 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -20,15 +20,21 @@ let get_dist_dir () =
2020
Filename.dirname (Filename.dirname (Xfile.abspath Sys.executable_name))
2121

2222
let conf_search_paths =
23-
[ Filename.concat (get_dist_dir()) "etc";
23+
let dist_dir = get_dist_dir() in
24+
[ Filename.concat dist_dir "etc";
25+
Filename.concat (Filename.concat dist_dir "etc") "cca";
2426
]
2527

2628
let parser_search_paths =
27-
[ Filename.concat (get_dist_dir()) "parsers";
29+
let dist_dir = get_dist_dir() in
30+
[ Filename.concat dist_dir "parsers";
31+
Filename.concat (Filename.concat (Filename.concat dist_dir "lib") "cca") "parsers";
2832
]
2933

3034
let module_search_paths =
31-
[ Filename.concat (get_dist_dir()) "modules";
35+
let dist_dir = get_dist_dir() in
36+
[ Filename.concat dist_dir "modules";
37+
Filename.concat (Filename.concat (Filename.concat dist_dir "lib") "cca") "modules";
3238
]
3339

3440
let _search_file name search_paths fname =

0 commit comments

Comments
 (0)