added FICUS_PATH environment variable support that helps to detect th…

…e standard library
vpisarev · Mar 25, 2021 · a526bd3 · a526bd3
1 parent 39e22fc
commit a526bd3
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 0 deletions.
diff --git a/compiler/Compiler.fx b/compiler/Compiler.fx
@@ -54,6 +54,7 @@ fun parse_all(fname0: string): bool
     val dir0 = Filename.dirname(fname0)
     val inc_dirs0 = if dir0 == cwd { cwd :: [] } else { dir0 :: cwd :: [] }
     val inc_dirs0 = inc_dirs0 + Options.opt.include_path
+    val inc_dirs0 = inc_dirs0 + Sys.getpath("FICUS_PATH")
     val inc_dirs0 = [: for d <- inc_dirs0 { Filename.normalize(cwd, d) } :]
     val name0_id = Ast.get_id(Filename.remove_extension(Filename.basename(fname0)))
     val minfo = Ast.find_module(name0_id, fname0)

diff --git a/lib/Sys.fx b/lib/Sys.fx
@@ -184,3 +184,9 @@ fun getenv(name: string): string = @ccode {
     }
     return fx_status;
 }
+
+fun getpath(name: string): string list
+{
+    val pathsep = if win32 {';'} else {':'}
+    getenv(name).split(pathsep)
+}