Skip to content
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
The table of contents is too big for display.
Diff view
Diff view
  •  
  •  
  •  
Original file line number Diff line number Diff line change
Expand Up @@ -10,11 +10,13 @@ import qualified GHC.Show
import qualified Io.Superposition.Model.BulkOperationInput
import qualified Io.Superposition.Model.BulkOperationOutput
import qualified Io.Superposition.Model.InternalServerError
import qualified Io.Superposition.Model.ResourceNotFound
import qualified Io.Superposition.SuperpositionClient
import qualified Io.Superposition.Utility

data BulkOperationError =
InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
| BuilderError Data.Text.Text
| DeSerializationError Io.Superposition.Utility.HttpMetadata Data.Text.Text
| UnexpectedError (Data.Maybe.Maybe Io.Superposition.Utility.HttpMetadata) Data.Text.Text
Expand All @@ -28,6 +30,7 @@ instance Io.Superposition.Utility.OperationError BulkOperationError where

getErrorParser status
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.ResourceNotFound.ResourceNotFound) = Just (fmap ResourceNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.ResourceNotFound.ResourceNotFound))
| otherwise = Nothing


Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -10,11 +10,13 @@ import qualified GHC.Show
import qualified Io.Superposition.Model.ConcludeExperimentInput
import qualified Io.Superposition.Model.ConcludeExperimentOutput
import qualified Io.Superposition.Model.InternalServerError
import qualified Io.Superposition.Model.ResourceNotFound
import qualified Io.Superposition.SuperpositionClient
import qualified Io.Superposition.Utility

data ConcludeExperimentError =
InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
| InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| BuilderError Data.Text.Text
| DeSerializationError Io.Superposition.Utility.HttpMetadata Data.Text.Text
| UnexpectedError (Data.Maybe.Maybe Io.Superposition.Utility.HttpMetadata) Data.Text.Text
Expand All @@ -27,6 +29,7 @@ instance Io.Superposition.Utility.OperationError ConcludeExperimentError where
mkUnexpectedError = UnexpectedError

getErrorParser status
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.ResourceNotFound.ResourceNotFound) = Just (fmap ResourceNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.ResourceNotFound.ResourceNotFound))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| otherwise = Nothing

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -10,11 +10,13 @@ import qualified GHC.Show
import qualified Io.Superposition.Model.CreateContextInput
import qualified Io.Superposition.Model.CreateContextOutput
import qualified Io.Superposition.Model.InternalServerError
import qualified Io.Superposition.Model.ResourceNotFound
import qualified Io.Superposition.SuperpositionClient
import qualified Io.Superposition.Utility

data CreateContextError =
InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
| InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| BuilderError Data.Text.Text
| DeSerializationError Io.Superposition.Utility.HttpMetadata Data.Text.Text
| UnexpectedError (Data.Maybe.Maybe Io.Superposition.Utility.HttpMetadata) Data.Text.Text
Expand All @@ -27,6 +29,7 @@ instance Io.Superposition.Utility.OperationError CreateContextError where
mkUnexpectedError = UnexpectedError

getErrorParser status
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.ResourceNotFound.ResourceNotFound) = Just (fmap ResourceNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.ResourceNotFound.ResourceNotFound))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| otherwise = Nothing

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -15,8 +15,8 @@ import qualified Io.Superposition.SuperpositionClient
import qualified Io.Superposition.Utility

data DeleteContextError =
InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
| InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| BuilderError Data.Text.Text
| DeSerializationError Io.Superposition.Utility.HttpMetadata Data.Text.Text
| UnexpectedError (Data.Maybe.Maybe Io.Superposition.Utility.HttpMetadata) Data.Text.Text
Expand All @@ -29,8 +29,8 @@ instance Io.Superposition.Utility.OperationError DeleteContextError where
mkUnexpectedError = UnexpectedError

getErrorParser status
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.ResourceNotFound.ResourceNotFound) = Just (fmap ResourceNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.ResourceNotFound.ResourceNotFound))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| otherwise = Nothing


Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -15,8 +15,8 @@ import qualified Io.Superposition.SuperpositionClient
import qualified Io.Superposition.Utility

data DeleteDefaultConfigError =
InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
| InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| BuilderError Data.Text.Text
| DeSerializationError Io.Superposition.Utility.HttpMetadata Data.Text.Text
| UnexpectedError (Data.Maybe.Maybe Io.Superposition.Utility.HttpMetadata) Data.Text.Text
Expand All @@ -29,8 +29,8 @@ instance Io.Superposition.Utility.OperationError DeleteDefaultConfigError where
mkUnexpectedError = UnexpectedError

getErrorParser status
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.ResourceNotFound.ResourceNotFound) = Just (fmap ResourceNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.ResourceNotFound.ResourceNotFound))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| otherwise = Nothing


Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -15,8 +15,8 @@ import qualified Io.Superposition.SuperpositionClient
import qualified Io.Superposition.Utility

data DeleteDimensionError =
InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
| InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| BuilderError Data.Text.Text
| DeSerializationError Io.Superposition.Utility.HttpMetadata Data.Text.Text
| UnexpectedError (Data.Maybe.Maybe Io.Superposition.Utility.HttpMetadata) Data.Text.Text
Expand All @@ -29,8 +29,8 @@ instance Io.Superposition.Utility.OperationError DeleteDimensionError where
mkUnexpectedError = UnexpectedError

getErrorParser status
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.ResourceNotFound.ResourceNotFound) = Just (fmap ResourceNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.ResourceNotFound.ResourceNotFound))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| otherwise = Nothing


Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -9,14 +9,14 @@ import qualified GHC.Generics
import qualified GHC.Show
import qualified Io.Superposition.Model.DeleteFunctionInput
import qualified Io.Superposition.Model.DeleteFunctionOutput
import qualified Io.Superposition.Model.FunctionNotFound
import qualified Io.Superposition.Model.InternalServerError
import qualified Io.Superposition.Model.ResourceNotFound
import qualified Io.Superposition.SuperpositionClient
import qualified Io.Superposition.Utility

data DeleteFunctionError =
InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| FunctionNotFound Io.Superposition.Model.FunctionNotFound.FunctionNotFound
ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
| InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| BuilderError Data.Text.Text
| DeSerializationError Io.Superposition.Utility.HttpMetadata Data.Text.Text
| UnexpectedError (Data.Maybe.Maybe Io.Superposition.Utility.HttpMetadata) Data.Text.Text
Expand All @@ -29,8 +29,8 @@ instance Io.Superposition.Utility.OperationError DeleteFunctionError where
mkUnexpectedError = UnexpectedError

getErrorParser status
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.ResourceNotFound.ResourceNotFound) = Just (fmap ResourceNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.ResourceNotFound.ResourceNotFound))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.FunctionNotFound.FunctionNotFound) = Just (fmap FunctionNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.FunctionNotFound.FunctionNotFound))
| otherwise = Nothing


Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -10,12 +10,12 @@ import qualified GHC.Show
import qualified Io.Superposition.Model.DeleteTypeTemplatesInput
import qualified Io.Superposition.Model.DeleteTypeTemplatesOutput
import qualified Io.Superposition.Model.InternalServerError
import qualified Io.Superposition.Model.TypeTemplatesNotFound
import qualified Io.Superposition.Model.ResourceNotFound
import qualified Io.Superposition.SuperpositionClient
import qualified Io.Superposition.Utility

data DeleteTypeTemplatesError =
TypeTemplatesNotFound Io.Superposition.Model.TypeTemplatesNotFound.TypeTemplatesNotFound
ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
| InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| BuilderError Data.Text.Text
| DeSerializationError Io.Superposition.Utility.HttpMetadata Data.Text.Text
Expand All @@ -29,7 +29,7 @@ instance Io.Superposition.Utility.OperationError DeleteTypeTemplatesError where
mkUnexpectedError = UnexpectedError

getErrorParser status
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.TypeTemplatesNotFound.TypeTemplatesNotFound) = Just (fmap TypeTemplatesNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.TypeTemplatesNotFound.TypeTemplatesNotFound))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.ResourceNotFound.ResourceNotFound) = Just (fmap ResourceNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.ResourceNotFound.ResourceNotFound))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| otherwise = Nothing

Expand Down
44 changes: 44 additions & 0 deletions clients/haskell/sdk/Io/Superposition/Command/DeleteWebhook.hs
Original file line number Diff line number Diff line change
@@ -0,0 +1,44 @@
module Io.Superposition.Command.DeleteWebhook (
DeleteWebhookError (..),
deleteWebhook
) where
import qualified Data.Aeson
import qualified Data.Maybe
import qualified Data.Text
import qualified GHC.Generics
import qualified GHC.Show
import qualified Io.Superposition.Model.DeleteWebhookInput
import qualified Io.Superposition.Model.DeleteWebhookOutput
import qualified Io.Superposition.Model.InternalServerError
import qualified Io.Superposition.Model.ResourceNotFound
import qualified Io.Superposition.SuperpositionClient
import qualified Io.Superposition.Utility

data DeleteWebhookError =
ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
| InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| BuilderError Data.Text.Text
| DeSerializationError Io.Superposition.Utility.HttpMetadata Data.Text.Text
| UnexpectedError (Data.Maybe.Maybe Io.Superposition.Utility.HttpMetadata) Data.Text.Text
deriving (GHC.Generics.Generic, GHC.Show.Show)

instance Data.Aeson.ToJSON DeleteWebhookError
instance Io.Superposition.Utility.OperationError DeleteWebhookError where
mkBuilderError = BuilderError
mkDeSerializationError = DeSerializationError
mkUnexpectedError = UnexpectedError

getErrorParser status
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.ResourceNotFound.ResourceNotFound) = Just (fmap ResourceNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.ResourceNotFound.ResourceNotFound))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| otherwise = Nothing


deleteWebhook :: Io.Superposition.SuperpositionClient.SuperpositionClient -> Io.Superposition.Model.DeleteWebhookInput.DeleteWebhookInputBuilder () -> IO (Either DeleteWebhookError Io.Superposition.Model.DeleteWebhookOutput.DeleteWebhookOutput)
deleteWebhook client builder =
let endpoint = Io.Superposition.SuperpositionClient.endpointUri client
manager = Io.Superposition.SuperpositionClient.httpManager client
token = Io.Superposition.SuperpositionClient.token client
setAuth = Io.Superposition.Utility.serHeader "Authorization" ("Bearer " <> token)
in Io.Superposition.Utility.runOperation endpoint manager setAuth (Io.Superposition.Model.DeleteWebhookInput.build builder)

Original file line number Diff line number Diff line change
Expand Up @@ -10,11 +10,13 @@ import qualified GHC.Show
import qualified Io.Superposition.Model.DiscardExperimentInput
import qualified Io.Superposition.Model.DiscardExperimentOutput
import qualified Io.Superposition.Model.InternalServerError
import qualified Io.Superposition.Model.ResourceNotFound
import qualified Io.Superposition.SuperpositionClient
import qualified Io.Superposition.Utility

data DiscardExperimentError =
InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
ResourceNotFound Io.Superposition.Model.ResourceNotFound.ResourceNotFound
| InternalServerError Io.Superposition.Model.InternalServerError.InternalServerError
| BuilderError Data.Text.Text
| DeSerializationError Io.Superposition.Utility.HttpMetadata Data.Text.Text
| UnexpectedError (Data.Maybe.Maybe Io.Superposition.Utility.HttpMetadata) Data.Text.Text
Expand All @@ -27,6 +29,7 @@ instance Io.Superposition.Utility.OperationError DiscardExperimentError where
mkUnexpectedError = UnexpectedError

getErrorParser status
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.ResourceNotFound.ResourceNotFound) = Just (fmap ResourceNotFound (Io.Superposition.Utility.responseParser @Io.Superposition.Model.ResourceNotFound.ResourceNotFound))
| status == (Io.Superposition.Utility.expectedStatus @Io.Superposition.Model.InternalServerError.InternalServerError) = Just (fmap InternalServerError (Io.Superposition.Utility.responseParser @Io.Superposition.Model.InternalServerError.InternalServerError))
| otherwise = Nothing

Expand Down
Loading
Loading