From 6ac0200d958ca069fcdf8ee3fedd8910d0d258a1 Mon Sep 17 00:00:00 2001
From: Jeremie Dimino <jdimino@janestreet.com>
Date: Wed, 8 Mar 2017 15:28:32 +0000
Subject: [PATCH] Fix the interpretation of  inside actions

---
 src/gen_rules.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/gen_rules.ml b/src/gen_rules.ml
index 56a9d62a..f79eae5f 100644
--- a/src/gen_rules.ml
+++ b/src/gen_rules.ml
@@ -625,7 +625,7 @@ module Gen(P : Params) = struct
             | dep1 :: _ -> Path (dep_exn var_name dep1))
           | "^" ->
             Paths (List.map deps ~f:(dep_exn var_name))
-          | "ROOT" -> Path Path.root
+          | "ROOT" -> Path ctx.build_dir
           | _ ->
             match String_map.find var_name dollar_var_map with
             | Some s -> Str s