@@ -1,5 +1,3 @@
-open Atomic
-
type 'a t = {
mutable value: 'a option;
mutex: Mutex.t;
@@ -6,7 +6,6 @@ open Exceptions
open Type
open Typecore
open ExceptionFunctions
-open AtomicLazy
let create_exception_context tctx =
match tctx.com.platform with (* TODO: implement for all targets *)
@@ -3,7 +3,6 @@ open Type
open PlatformConfig
open Error
type context = {
scom : SafeCom.t;
@@ -4,7 +4,6 @@ open Type
open Exceptions
(**
Inserts `haxe.NativeStackTrace.saveStack(e)` in non-haxe.Exception catches.
@@ -26,7 +26,6 @@ open Type
open Gctx
open Hlcode
-open Semver
(* compiler *)