Add NFDataX (SimOnly a)

Author: martijnbastiaan

changelog/2025-03-06T11_10_03+01_00_add_nfdatax_simonly

@@ -0,0 +1 @@
+ADDED: Added instance `NFDataX (SimOnly a)`

clash-prelude/src/Clash/Magic.hs

@@ -17,6 +17,7 @@ Refer to "Clash.Annotations.TopEntity" for controlling naming of entities
 -}
 
 {-# LANGUAGE CPP #-}
+{-# LANGUAGE DeriveAnyClass #-}
 {-# LANGUAGE QuasiQuotes #-}
 {-# LANGUAGE TemplateHaskellQuotes #-}
 
@@ -46,7 +47,9 @@ module Clash.Magic
 import Clash.Annotations.Primitive (Primitive(..), hasBlackBox)
 import Clash.NamedTypes            ((:::))
 import Clash.Promoted.Symbol       (SSymbol)
+import Clash.XException            (NFDataX)
 import Data.String.Interpolate     (__i)
+import GHC.Generics                (Generic)
 import GHC.Magic                   (noinline)
 import GHC.Stack                   (HasCallStack, withFrozenCallStack)
 import GHC.TypeLits                (Nat,Symbol)
@@ -272,7 +275,7 @@ clashSimulation = noinline True
 --   * Co-simulation state or meta-data
 --   * etc.
 data SimOnly a = SimOnly a
-  deriving (Eq, Ord, Foldable, Traversable)
+  deriving (Generic, Eq, Ord, Foldable, Traversable, NFDataX)
 {-# ANN SimOnly hasBlackBox #-}
 
 instance Functor SimOnly where