From a98f5ab244d0e96cb90b6d94cb79ce867cdfb335 Mon Sep 17 00:00:00 2001
From: Josh Berdine <jjb@fb.com>
Date: Fri, 30 Jun 2017 06:24:26 -0700
Subject: [PATCH] unbreak build

Reviewed By: jvillard, akotulski

Differential Revision: D5355748

fbshipit-source-id: fea00c6
---
 infer/src/base/Multilinks.re | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/infer/src/base/Multilinks.re b/infer/src/base/Multilinks.re
index db94ffde1..45f427c44 100644
--- a/infer/src/base/Multilinks.re
+++ b/infer/src/base/Multilinks.re
@@ -30,7 +30,7 @@ let reset_cache () => String.Table.clear multilink_files_cache;
 let read ::dir :option t => {
   let multilink_fname = Filename.concat dir multilink_file_name;
   switch (Utils.read_file multilink_fname) {
-  | Error error => None
+  | Error _ => None
   | Ok lines =>
     let links = create ();
     List.iter