diff --git a/compiler/GHC/CmmToAsm/Wasm/Asm.hs b/compiler/GHC/CmmToAsm/Wasm/Asm.hs index 6ee754ff7b413d3c6d177ffa41f75be448f54739..60f71d9c059a7f24c63371092e9c0123577ed652 100644 --- a/compiler/GHC/CmmToAsm/Wasm/Asm.hs +++ b/compiler/GHC/CmmToAsm/Wasm/Asm.hs @@ -12,6 +12,7 @@ import Control.Monad.Trans.Reader import Data.ByteString (ByteString) import qualified Data.ByteString as BS import Data.ByteString.Builder +import qualified Data.ByteString.Char8 as BS8 import Data.Coerce import Data.Foldable import qualified GHC.Data.Word64Set as WS @@ -25,6 +26,7 @@ import GHC.CmmToAsm.Wasm.Utils import GHC.Data.FastString import GHC.Float import GHC.Prelude +import GHC.Settings.Config (cProjectVersion) import GHC.Types.Basic import GHC.Types.Unique import GHC.Types.Unique.Map @@ -485,7 +487,7 @@ asmTellProducers = do asmTellVec [ do asmTellBS "ghc" - asmTellBS "9.6" + asmTellBS $ BS8.pack cProjectVersion ] ]