add Pretty instance for NoReturnFunStatus

This commit is contained in:
Valentin Robert 2024-01-05 11:46:25 -08:00
parent 7d840065be
commit 0f2264b7c4

View File

@ -34,6 +34,7 @@ import Data.Map ( Map )
import Data.Parameterized.Nonce
import Data.Parameterized.TraversableF
import Data.Sequence (Seq)
import qualified Prettyprinter as PP
import Data.Macaw.AbsDomain.AbsState as AbsState
import qualified Data.Macaw.AbsDomain.JumpBounds as Jmp
@ -50,10 +51,14 @@ import Data.Macaw.Memory
-- | Flags whether a function is labeled no return or not.
data NoReturnFunStatus
= NoReturnFun
-- ^ Function labeled no return
| MayReturnFun
-- ^ Function may retun
= NoReturnFun
-- ^ Function labeled no return
| MayReturnFun
-- ^ Function may retun
deriving (Show)
instance PP.Pretty NoReturnFunStatus where
pretty = PP.viaShow
type ClassificationError = String