[cleanup] add missing `open! IStd`

Summary:
Almost all the files are supposed to do this. When they don't, the build adds
it automatically anyway, but it's better to always include it to avoid
confusion (and help other automated tools).

Reviewed By: mbouaziz

Differential Revision: D6723285

fbshipit-source-id: 0fe8a16

infer/src/backend/RetainCycles.ml

@@ -6,6 +6,7 @@
  * LICENSE file in the root directory of this source tree. An additional grant
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
+open! IStd
 module L = Logging
 module F = Format
 module MF = MarkupFormatter

infer/src/backend/RetainCycles.mli

@@ -7,4 +7,6 @@
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
 
+open! IStd
+
 val report_cycle : Tenv.t -> Sil.hpred -> Prop.normal Prop.t option option -> exn option

infer/src/backend/RetainCyclesType.ml

@@ -6,6 +6,8 @@
  * LICENSE file in the root directory of this source tree. An additional grant
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
+open! IStd
+
 type retain_cycle_node = {rc_node_exp: Exp.t; rc_node_typ: Typ.t}
 
 type retain_cycle_field_objc = {rc_field_name: Typ.Fieldname.t; rc_field_inst: Sil.inst}

infer/src/backend/RetainCyclesType.mli

@@ -7,6 +7,8 @@
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
 
+open! IStd
+
 type retain_cycle_node = {rc_node_exp: Exp.t; rc_node_typ: Typ.t}
 
 type retain_cycle_field_objc = {rc_field_name: Typ.Fieldname.t; rc_field_inst: Sil.inst}

infer/src/backend/SymExecBlocks.ml

@@ -6,6 +6,9 @@
  * LICENSE file in the root directory of this source tree. An additional grant
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
+
+open! IStd
+
 (* Given two lists of tuples (exp1, var1, typ1) and (exp2, var2, typ2)
 append the lists avoiding duplicates, where if the variables exist we check their
 equality, otherwise we check the equality of the expressions. This is to avoid

infer/src/base/ProcessPoolState.ml

@@ -6,5 +6,8 @@
  * LICENSE file in the root directory of this source tree. An additional grant
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
+
+open! IStd
+
 (** Keep track of whether the current execution is in a child process *)
 let in_child = ref false

infer/src/checkers/Litho.ml

@@ -7,6 +7,7 @@
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
 
+open! IStd
 module F = Format
 module L = Logging
 module Domain = LithoDomain

infer/src/checkers/LithoDomain.ml

@@ -7,6 +7,7 @@
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
 
+open! IStd
 module F = Format
 module L = Logging
 

infer/src/checkers/NullabilityCheck.ml

@@ -7,6 +7,7 @@
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
 
+open! IStd
 module F = Format
 module L = Logging
 module MF = MarkupFormatter

infer/src/checkers/NullabilityCheck.mli

@@ -7,4 +7,6 @@
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
 
+open! IStd
+
 val checker : Callbacks.proc_callback_t

infer/src/clang/CTLExceptions.ml

@@ -7,6 +7,8 @@
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
 
+open! IStd
+
 exception ALParserInvariantViolationException of string
 
 type exc_info = {description: string; filename: string; line: int}

infer/src/clang_stubs/CTLParserHelper.ml

@@ -7,6 +7,8 @@
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
 
+open! IStd
+
 let validate_al_files () =
   prerr_endline "ERROR: infer was built without clang support." ;
   Die.exit 1

infer/src/opensource/JsonBuilder.ml

@@ -7,6 +7,8 @@
  * of patent rights can be found in the PATENTS file in the same directory.
  *)
 
+open! IStd
+
 type t = (string * Yojson.Basic.json) list
 
 let empty = []