Module Target_system
type architecture = | IA32| X86_64| ARM| AArch64| POWER| Z| Riscv
val is_64_bit : unit -> boolval is_32_bit : unit -> booltype derived_system = | Linux| MinGW_32| MinGW_64| Win32| Win64| Cygwin| MacOS_like| FreeBSD| NetBSD| OpenBSD| Generic_BSD| Solaris| Dragonfly| GNU| BeOS| Unknown
val is_windows : unit -> booltype assembler = | GAS_like| MacOS| MASM
type windows_system = private | Cygwin| MinGW| Native
type system = private | Linux| Windows of Target_system.windows_system| MacOS_like| FreeBSD| NetBSD| OpenBSD| Generic_BSD| Solaris| Dragonfly| GNU| BeOS| Unknown
val windows : unit -> boolval is_macos : unit -> boolval is_gas : unit -> bool