module GHC.Platform.Host where

import GHC.Platform

cHostPlatformArch   :: Arch
cHostPlatformArch :: Arch
cHostPlatformArch   = Arch
ArchX86_64

cHostPlatformOS     :: OS
cHostPlatformOS :: OS
cHostPlatformOS     = OS
OSLinux

cHostPlatformMini :: PlatformMini
cHostPlatformMini :: PlatformMini
cHostPlatformMini = PlatformMini :: Arch -> OS -> PlatformMini
PlatformMini
  { platformMini_arch :: Arch
platformMini_arch = Arch
cHostPlatformArch
  , platformMini_os :: OS
platformMini_os = OS
cHostPlatformOS
  }