unbreak build

Reviewed By: jvillard, akotulski

Differential Revision: D5355748

fbshipit-source-id: fea00c6

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