Unused open

src/filters/exception/exceptions.ml

@@ -1,5 +1,4 @@
 open Globals
-open Ast
 open Type
 open PlatformConfig
 open Error

src/filters/filters.ml

@@ -17,7 +17,6 @@
 	Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  *)
 
-open Ast
 open Common
 open Type
 open Typecore

src/filters/renameVars.ml

@@ -1,6 +1,5 @@
 open Globals
 open Type
-open SafeCom
 open Ast
 open PlatformConfig
 

src/filters/safe/checkVarInit.ml

@@ -1,5 +1,4 @@
 open Globals
-open SafeCom
 open Type
 
 let check_local_vars_init scom e =

src/filters/safe/localStatic.ml

@@ -1,6 +1,5 @@
 open Globals
 open Type
-open Typecore
 open Error
 
 type lscontext = {

src/macro/macroApi.ml

@@ -1669,7 +1669,6 @@ let decode_path v =
 	(pack,name)
 
 let decode_platform_config v =
-	let open Common in
 	let capture_policy = match decode_enum (field v "capturePolicy") with
 		| 0, [] -> CPNone
 		| 1, [] -> CPWrapRef

src/optimization/analyzerTexprTransformer.ml

@@ -20,7 +20,6 @@
 open Globals
 open Ast
 open Type
-open Common
 open AnalyzerConfig
 open AnalyzerTypes
 open AnalyzerTypes.BasicBlock

src/optimization/inlineConstructors.ml

@@ -18,7 +18,6 @@
  *)
 
 open Ast
-open Typecore
 open SafeCom
 open Type
 open Error

src/optimization/optimizer.ml

@@ -20,7 +20,6 @@
 open Ast
 open Type
 open SafeCom
-open Typecore
 open OptimizerTexpr
 open Error
 open Globals