{-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE DerivingVia #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE QuasiQuotes #-} {-# LANGUAGE TemplateHaskell #-} {-# OPTIONS_GHC -Wno-unrecognised-pragmas #-} {-# HLINT ignore "Unused LANGUAGE pragma" #-} module IntegrationSpec.NoOpWorkflow where import Control.Exception import Control.Monad import RequireCallStack (provideCallStack) import Temporal.Duration import Temporal.Payload import Temporal.TH import Temporal.Workflow noOpWorkflow :: Workflow () noOpWorkflow = provideCallStack $ pure () registerWorkflow 'noOpWorkflow