{-# LANGUAGE TypeOperators #-}
module TDLib.Generated.Functions where
import Polysemy
import TDLib.Effect
import TDLib.Generated.FunArgs
import TDLib.Generated.Types
import TDLib.Types.Common
getAuthorizationState :: Member TDLib r => GetAuthorizationState -> Sem r (Error ∪ AuthorizationState)
getAuthorizationState :: GetAuthorizationState -> Sem r (Error ∪ AuthorizationState)
getAuthorizationState = GetAuthorizationState -> Sem r (Error ∪ AuthorizationState)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setTdlibParameters :: Member TDLib r => SetTdlibParameters -> Sem r (Error ∪ Ok)
setTdlibParameters :: SetTdlibParameters -> Sem r (Error ∪ Ok)
setTdlibParameters = SetTdlibParameters -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkDatabaseEncryptionKey :: Member TDLib r => CheckDatabaseEncryptionKey -> Sem r (Error ∪ Ok)
checkDatabaseEncryptionKey :: CheckDatabaseEncryptionKey -> Sem r (Error ∪ Ok)
checkDatabaseEncryptionKey = CheckDatabaseEncryptionKey -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setAuthenticationPhoneNumber :: Member TDLib r => SetAuthenticationPhoneNumber -> Sem r (Error ∪ Ok)
setAuthenticationPhoneNumber :: SetAuthenticationPhoneNumber -> Sem r (Error ∪ Ok)
setAuthenticationPhoneNumber = SetAuthenticationPhoneNumber -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
resendAuthenticationCode :: Member TDLib r => ResendAuthenticationCode -> Sem r (Error ∪ Ok)
resendAuthenticationCode :: ResendAuthenticationCode -> Sem r (Error ∪ Ok)
resendAuthenticationCode = ResendAuthenticationCode -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkAuthenticationCode :: Member TDLib r => CheckAuthenticationCode -> Sem r (Error ∪ Ok)
checkAuthenticationCode :: CheckAuthenticationCode -> Sem r (Error ∪ Ok)
checkAuthenticationCode = CheckAuthenticationCode -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
requestQrCodeAuthentication :: Member TDLib r => RequestQrCodeAuthentication -> Sem r (Error ∪ Ok)
requestQrCodeAuthentication :: RequestQrCodeAuthentication -> Sem r (Error ∪ Ok)
requestQrCodeAuthentication = RequestQrCodeAuthentication -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
registerUser :: Member TDLib r => RegisterUser -> Sem r (Error ∪ Ok)
registerUser :: RegisterUser -> Sem r (Error ∪ Ok)
registerUser = RegisterUser -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkAuthenticationPassword :: Member TDLib r => CheckAuthenticationPassword -> Sem r (Error ∪ Ok)
checkAuthenticationPassword :: CheckAuthenticationPassword -> Sem r (Error ∪ Ok)
checkAuthenticationPassword = CheckAuthenticationPassword -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
requestAuthenticationPasswordRecovery :: Member TDLib r => RequestAuthenticationPasswordRecovery -> Sem r (Error ∪ Ok)
requestAuthenticationPasswordRecovery :: RequestAuthenticationPasswordRecovery -> Sem r (Error ∪ Ok)
requestAuthenticationPasswordRecovery = RequestAuthenticationPasswordRecovery -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
recoverAuthenticationPassword :: Member TDLib r => RecoverAuthenticationPassword -> Sem r (Error ∪ Ok)
recoverAuthenticationPassword :: RecoverAuthenticationPassword -> Sem r (Error ∪ Ok)
recoverAuthenticationPassword = RecoverAuthenticationPassword -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkAuthenticationBotToken :: Member TDLib r => CheckAuthenticationBotToken -> Sem r (Error ∪ Ok)
checkAuthenticationBotToken :: CheckAuthenticationBotToken -> Sem r (Error ∪ Ok)
checkAuthenticationBotToken = CheckAuthenticationBotToken -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
logOut :: Member TDLib r => LogOut -> Sem r (Error ∪ Ok)
logOut :: LogOut -> Sem r (Error ∪ Ok)
logOut = LogOut -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
close :: Member TDLib r => Close -> Sem r (Error ∪ Ok)
close :: Close -> Sem r (Error ∪ Ok)
close = Close -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
destroy :: Member TDLib r => Destroy -> Sem r (Error ∪ Ok)
destroy :: Destroy -> Sem r (Error ∪ Ok)
destroy = Destroy -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
confirmQrCodeAuthentication :: Member TDLib r => ConfirmQrCodeAuthentication -> Sem r (Error ∪ Session)
confirmQrCodeAuthentication :: ConfirmQrCodeAuthentication -> Sem r (Error ∪ Session)
confirmQrCodeAuthentication = ConfirmQrCodeAuthentication -> Sem r (Error ∪ Session)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getCurrentState :: Member TDLib r => GetCurrentState -> Sem r (Error ∪ Updates)
getCurrentState :: GetCurrentState -> Sem r (Error ∪ Updates)
getCurrentState = GetCurrentState -> Sem r (Error ∪ Updates)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setDatabaseEncryptionKey :: Member TDLib r => SetDatabaseEncryptionKey -> Sem r (Error ∪ Ok)
setDatabaseEncryptionKey :: SetDatabaseEncryptionKey -> Sem r (Error ∪ Ok)
setDatabaseEncryptionKey = SetDatabaseEncryptionKey -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getPasswordState :: Member TDLib r => GetPasswordState -> Sem r (Error ∪ PasswordState)
getPasswordState :: GetPasswordState -> Sem r (Error ∪ PasswordState)
getPasswordState = GetPasswordState -> Sem r (Error ∪ PasswordState)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setPassword :: Member TDLib r => SetPassword -> Sem r (Error ∪ PasswordState)
setPassword :: SetPassword -> Sem r (Error ∪ PasswordState)
setPassword = SetPassword -> Sem r (Error ∪ PasswordState)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getRecoveryEmailAddress :: Member TDLib r => GetRecoveryEmailAddress -> Sem r (Error ∪ RecoveryEmailAddress)
getRecoveryEmailAddress :: GetRecoveryEmailAddress -> Sem r (Error ∪ RecoveryEmailAddress)
getRecoveryEmailAddress = GetRecoveryEmailAddress -> Sem r (Error ∪ RecoveryEmailAddress)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setRecoveryEmailAddress :: Member TDLib r => SetRecoveryEmailAddress -> Sem r (Error ∪ PasswordState)
setRecoveryEmailAddress :: SetRecoveryEmailAddress -> Sem r (Error ∪ PasswordState)
setRecoveryEmailAddress = SetRecoveryEmailAddress -> Sem r (Error ∪ PasswordState)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkRecoveryEmailAddressCode :: Member TDLib r => CheckRecoveryEmailAddressCode -> Sem r (Error ∪ PasswordState)
checkRecoveryEmailAddressCode :: CheckRecoveryEmailAddressCode -> Sem r (Error ∪ PasswordState)
checkRecoveryEmailAddressCode = CheckRecoveryEmailAddressCode -> Sem r (Error ∪ PasswordState)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
resendRecoveryEmailAddressCode :: Member TDLib r => ResendRecoveryEmailAddressCode -> Sem r (Error ∪ PasswordState)
resendRecoveryEmailAddressCode :: ResendRecoveryEmailAddressCode -> Sem r (Error ∪ PasswordState)
resendRecoveryEmailAddressCode = ResendRecoveryEmailAddressCode -> Sem r (Error ∪ PasswordState)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
requestPasswordRecovery :: Member TDLib r => RequestPasswordRecovery -> Sem r (Error ∪ EmailAddressAuthenticationCodeInfo)
requestPasswordRecovery :: RequestPasswordRecovery
-> Sem r (Error ∪ EmailAddressAuthenticationCodeInfo)
requestPasswordRecovery = RequestPasswordRecovery
-> Sem r (Error ∪ EmailAddressAuthenticationCodeInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
recoverPassword :: Member TDLib r => RecoverPassword -> Sem r (Error ∪ PasswordState)
recoverPassword :: RecoverPassword -> Sem r (Error ∪ PasswordState)
recoverPassword = RecoverPassword -> Sem r (Error ∪ PasswordState)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
createTemporaryPassword :: Member TDLib r => CreateTemporaryPassword -> Sem r (Error ∪ TemporaryPasswordState)
createTemporaryPassword :: CreateTemporaryPassword -> Sem r (Error ∪ TemporaryPasswordState)
createTemporaryPassword = CreateTemporaryPassword -> Sem r (Error ∪ TemporaryPasswordState)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getTemporaryPasswordState :: Member TDLib r => GetTemporaryPasswordState -> Sem r (Error ∪ TemporaryPasswordState)
getTemporaryPasswordState :: GetTemporaryPasswordState -> Sem r (Error ∪ TemporaryPasswordState)
getTemporaryPasswordState = GetTemporaryPasswordState -> Sem r (Error ∪ TemporaryPasswordState)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getMe :: Member TDLib r => GetMe -> Sem r (Error ∪ User)
getMe :: GetMe -> Sem r (Error ∪ User)
getMe = GetMe -> Sem r (Error ∪ User)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getUser :: Member TDLib r => GetUser -> Sem r (Error ∪ User)
getUser :: GetUser -> Sem r (Error ∪ User)
getUser = GetUser -> Sem r (Error ∪ User)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getUserFullInfo :: Member TDLib r => GetUserFullInfo -> Sem r (Error ∪ UserFullInfo)
getUserFullInfo :: GetUserFullInfo -> Sem r (Error ∪ UserFullInfo)
getUserFullInfo = GetUserFullInfo -> Sem r (Error ∪ UserFullInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getBasicGroup :: Member TDLib r => GetBasicGroup -> Sem r (Error ∪ BasicGroup)
getBasicGroup :: GetBasicGroup -> Sem r (Error ∪ BasicGroup)
getBasicGroup = GetBasicGroup -> Sem r (Error ∪ BasicGroup)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getBasicGroupFullInfo :: Member TDLib r => GetBasicGroupFullInfo -> Sem r (Error ∪ BasicGroupFullInfo)
getBasicGroupFullInfo :: GetBasicGroupFullInfo -> Sem r (Error ∪ BasicGroupFullInfo)
getBasicGroupFullInfo = GetBasicGroupFullInfo -> Sem r (Error ∪ BasicGroupFullInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getSupergroup :: Member TDLib r => GetSupergroup -> Sem r (Error ∪ Supergroup)
getSupergroup :: GetSupergroup -> Sem r (Error ∪ Supergroup)
getSupergroup = GetSupergroup -> Sem r (Error ∪ Supergroup)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getSupergroupFullInfo :: Member TDLib r => GetSupergroupFullInfo -> Sem r (Error ∪ SupergroupFullInfo)
getSupergroupFullInfo :: GetSupergroupFullInfo -> Sem r (Error ∪ SupergroupFullInfo)
getSupergroupFullInfo = GetSupergroupFullInfo -> Sem r (Error ∪ SupergroupFullInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getSecretChat :: Member TDLib r => GetSecretChat -> Sem r (Error ∪ SecretChat)
getSecretChat :: GetSecretChat -> Sem r (Error ∪ SecretChat)
getSecretChat = GetSecretChat -> Sem r (Error ∪ SecretChat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChat :: Member TDLib r => GetChat -> Sem r (Error ∪ Chat)
getChat :: GetChat -> Sem r (Error ∪ Chat)
getChat = GetChat -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getMessage :: Member TDLib r => GetMessage -> Sem r (Error ∪ Message)
getMessage :: GetMessage -> Sem r (Error ∪ Message)
getMessage = GetMessage -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getMessageLocally :: Member TDLib r => GetMessageLocally -> Sem r (Error ∪ Message)
getMessageLocally :: GetMessageLocally -> Sem r (Error ∪ Message)
getMessageLocally = GetMessageLocally -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getRepliedMessage :: Member TDLib r => GetRepliedMessage -> Sem r (Error ∪ Message)
getRepliedMessage :: GetRepliedMessage -> Sem r (Error ∪ Message)
getRepliedMessage = GetRepliedMessage -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatPinnedMessage :: Member TDLib r => GetChatPinnedMessage -> Sem r (Error ∪ Message)
getChatPinnedMessage :: GetChatPinnedMessage -> Sem r (Error ∪ Message)
getChatPinnedMessage = GetChatPinnedMessage -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getMessages :: Member TDLib r => GetMessages -> Sem r (Error ∪ Messages)
getMessages :: GetMessages -> Sem r (Error ∪ Messages)
getMessages = GetMessages -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getFile :: Member TDLib r => GetFile -> Sem r (Error ∪ File)
getFile :: GetFile -> Sem r (Error ∪ File)
getFile = GetFile -> Sem r (Error ∪ File)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getRemoteFile :: Member TDLib r => GetRemoteFile -> Sem r (Error ∪ File)
getRemoteFile :: GetRemoteFile -> Sem r (Error ∪ File)
getRemoteFile = GetRemoteFile -> Sem r (Error ∪ File)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChats :: Member TDLib r => GetChats -> Sem r (Error ∪ Chats)
getChats :: GetChats -> Sem r (Error ∪ Chats)
getChats = GetChats -> Sem r (Error ∪ Chats)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchPublicChat :: Member TDLib r => SearchPublicChat -> Sem r (Error ∪ Chat)
searchPublicChat :: SearchPublicChat -> Sem r (Error ∪ Chat)
searchPublicChat = SearchPublicChat -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchPublicChats :: Member TDLib r => SearchPublicChats -> Sem r (Error ∪ Chats)
searchPublicChats :: SearchPublicChats -> Sem r (Error ∪ Chats)
searchPublicChats = SearchPublicChats -> Sem r (Error ∪ Chats)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchChats :: Member TDLib r => SearchChats -> Sem r (Error ∪ Chats)
searchChats :: SearchChats -> Sem r (Error ∪ Chats)
searchChats = SearchChats -> Sem r (Error ∪ Chats)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchChatsOnServer :: Member TDLib r => SearchChatsOnServer -> Sem r (Error ∪ Chats)
searchChatsOnServer :: SearchChatsOnServer -> Sem r (Error ∪ Chats)
searchChatsOnServer = SearchChatsOnServer -> Sem r (Error ∪ Chats)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchChatsNearby :: Member TDLib r => SearchChatsNearby -> Sem r (Error ∪ ChatsNearby)
searchChatsNearby :: SearchChatsNearby -> Sem r (Error ∪ ChatsNearby)
searchChatsNearby = SearchChatsNearby -> Sem r (Error ∪ ChatsNearby)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getTopChats :: Member TDLib r => GetTopChats -> Sem r (Error ∪ Chats)
getTopChats :: GetTopChats -> Sem r (Error ∪ Chats)
getTopChats = GetTopChats -> Sem r (Error ∪ Chats)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeTopChat :: Member TDLib r => RemoveTopChat -> Sem r (Error ∪ Ok)
removeTopChat :: RemoveTopChat -> Sem r (Error ∪ Ok)
removeTopChat = RemoveTopChat -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addRecentlyFoundChat :: Member TDLib r => AddRecentlyFoundChat -> Sem r (Error ∪ Ok)
addRecentlyFoundChat :: AddRecentlyFoundChat -> Sem r (Error ∪ Ok)
addRecentlyFoundChat = AddRecentlyFoundChat -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeRecentlyFoundChat :: Member TDLib r => RemoveRecentlyFoundChat -> Sem r (Error ∪ Ok)
removeRecentlyFoundChat :: RemoveRecentlyFoundChat -> Sem r (Error ∪ Ok)
removeRecentlyFoundChat = RemoveRecentlyFoundChat -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
clearRecentlyFoundChats :: Member TDLib r => ClearRecentlyFoundChats -> Sem r (Error ∪ Ok)
clearRecentlyFoundChats :: ClearRecentlyFoundChats -> Sem r (Error ∪ Ok)
clearRecentlyFoundChats = ClearRecentlyFoundChats -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkChatUsername :: Member TDLib r => CheckChatUsername -> Sem r (Error ∪ CheckChatUsernameResult)
checkChatUsername :: CheckChatUsername -> Sem r (Error ∪ CheckChatUsernameResult)
checkChatUsername = CheckChatUsername -> Sem r (Error ∪ CheckChatUsernameResult)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getCreatedPublicChats :: Member TDLib r => GetCreatedPublicChats -> Sem r (Error ∪ Chats)
getCreatedPublicChats :: GetCreatedPublicChats -> Sem r (Error ∪ Chats)
getCreatedPublicChats = GetCreatedPublicChats -> Sem r (Error ∪ Chats)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkCreatedPublicChatsLimit :: Member TDLib r => CheckCreatedPublicChatsLimit -> Sem r (Error ∪ Ok)
checkCreatedPublicChatsLimit :: CheckCreatedPublicChatsLimit -> Sem r (Error ∪ Ok)
checkCreatedPublicChatsLimit = CheckCreatedPublicChatsLimit -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getSuitableDiscussionChats :: Member TDLib r => GetSuitableDiscussionChats -> Sem r (Error ∪ Chats)
getSuitableDiscussionChats :: GetSuitableDiscussionChats -> Sem r (Error ∪ Chats)
getSuitableDiscussionChats = GetSuitableDiscussionChats -> Sem r (Error ∪ Chats)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getInactiveSupergroupChats :: Member TDLib r => GetInactiveSupergroupChats -> Sem r (Error ∪ Chats)
getInactiveSupergroupChats :: GetInactiveSupergroupChats -> Sem r (Error ∪ Chats)
getInactiveSupergroupChats = GetInactiveSupergroupChats -> Sem r (Error ∪ Chats)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getGroupsInCommon :: Member TDLib r => GetGroupsInCommon -> Sem r (Error ∪ Chats)
getGroupsInCommon :: GetGroupsInCommon -> Sem r (Error ∪ Chats)
getGroupsInCommon = GetGroupsInCommon -> Sem r (Error ∪ Chats)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatHistory :: Member TDLib r => GetChatHistory -> Sem r (Error ∪ Messages)
getChatHistory :: GetChatHistory -> Sem r (Error ∪ Messages)
getChatHistory = GetChatHistory -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteChatHistory :: Member TDLib r => DeleteChatHistory -> Sem r (Error ∪ Ok)
deleteChatHistory :: DeleteChatHistory -> Sem r (Error ∪ Ok)
deleteChatHistory = DeleteChatHistory -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchChatMessages :: Member TDLib r => SearchChatMessages -> Sem r (Error ∪ Messages)
searchChatMessages :: SearchChatMessages -> Sem r (Error ∪ Messages)
searchChatMessages = SearchChatMessages -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchMessages :: Member TDLib r => SearchMessages -> Sem r (Error ∪ Messages)
searchMessages :: SearchMessages -> Sem r (Error ∪ Messages)
searchMessages = SearchMessages -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchSecretMessages :: Member TDLib r => SearchSecretMessages -> Sem r (Error ∪ FoundMessages)
searchSecretMessages :: SearchSecretMessages -> Sem r (Error ∪ FoundMessages)
searchSecretMessages = SearchSecretMessages -> Sem r (Error ∪ FoundMessages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchCallMessages :: Member TDLib r => SearchCallMessages -> Sem r (Error ∪ Messages)
searchCallMessages :: SearchCallMessages -> Sem r (Error ∪ Messages)
searchCallMessages = SearchCallMessages -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchChatRecentLocationMessages :: Member TDLib r => SearchChatRecentLocationMessages -> Sem r (Error ∪ Messages)
searchChatRecentLocationMessages :: SearchChatRecentLocationMessages -> Sem r (Error ∪ Messages)
searchChatRecentLocationMessages = SearchChatRecentLocationMessages -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getActiveLiveLocationMessages :: Member TDLib r => GetActiveLiveLocationMessages -> Sem r (Error ∪ Messages)
getActiveLiveLocationMessages :: GetActiveLiveLocationMessages -> Sem r (Error ∪ Messages)
getActiveLiveLocationMessages = GetActiveLiveLocationMessages -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatMessageByDate :: Member TDLib r => GetChatMessageByDate -> Sem r (Error ∪ Message)
getChatMessageByDate :: GetChatMessageByDate -> Sem r (Error ∪ Message)
getChatMessageByDate = GetChatMessageByDate -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatMessageCount :: Member TDLib r => GetChatMessageCount -> Sem r (Error ∪ Count)
getChatMessageCount :: GetChatMessageCount -> Sem r (Error ∪ Count)
getChatMessageCount = GetChatMessageCount -> Sem r (Error ∪ Count)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatScheduledMessages :: Member TDLib r => GetChatScheduledMessages -> Sem r (Error ∪ Messages)
getChatScheduledMessages :: GetChatScheduledMessages -> Sem r (Error ∪ Messages)
getChatScheduledMessages = GetChatScheduledMessages -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeNotification :: Member TDLib r => RemoveNotification -> Sem r (Error ∪ Ok)
removeNotification :: RemoveNotification -> Sem r (Error ∪ Ok)
removeNotification = RemoveNotification -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeNotificationGroup :: Member TDLib r => RemoveNotificationGroup -> Sem r (Error ∪ Ok)
removeNotificationGroup :: RemoveNotificationGroup -> Sem r (Error ∪ Ok)
removeNotificationGroup = RemoveNotificationGroup -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getPublicMessageLink :: Member TDLib r => GetPublicMessageLink -> Sem r (Error ∪ PublicMessageLink)
getPublicMessageLink :: GetPublicMessageLink -> Sem r (Error ∪ PublicMessageLink)
getPublicMessageLink = GetPublicMessageLink -> Sem r (Error ∪ PublicMessageLink)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getMessageLink :: Member TDLib r => GetMessageLink -> Sem r (Error ∪ HttpUrl)
getMessageLink :: GetMessageLink -> Sem r (Error ∪ HttpUrl)
getMessageLink = GetMessageLink -> Sem r (Error ∪ HttpUrl)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getMessageLinkInfo :: Member TDLib r => GetMessageLinkInfo -> Sem r (Error ∪ MessageLinkInfo)
getMessageLinkInfo :: GetMessageLinkInfo -> Sem r (Error ∪ MessageLinkInfo)
getMessageLinkInfo = GetMessageLinkInfo -> Sem r (Error ∪ MessageLinkInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendMessage :: Member TDLib r => SendMessage -> Sem r (Error ∪ Message)
sendMessage :: SendMessage -> Sem r (Error ∪ Message)
sendMessage = SendMessage -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendMessageAlbum :: Member TDLib r => SendMessageAlbum -> Sem r (Error ∪ Messages)
sendMessageAlbum :: SendMessageAlbum -> Sem r (Error ∪ Messages)
sendMessageAlbum = SendMessageAlbum -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendBotStartMessage :: Member TDLib r => SendBotStartMessage -> Sem r (Error ∪ Message)
sendBotStartMessage :: SendBotStartMessage -> Sem r (Error ∪ Message)
sendBotStartMessage = SendBotStartMessage -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendInlineQueryResultMessage :: Member TDLib r => SendInlineQueryResultMessage -> Sem r (Error ∪ Message)
sendInlineQueryResultMessage :: SendInlineQueryResultMessage -> Sem r (Error ∪ Message)
sendInlineQueryResultMessage = SendInlineQueryResultMessage -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
forwardMessages :: Member TDLib r => ForwardMessages -> Sem r (Error ∪ Messages)
forwardMessages :: ForwardMessages -> Sem r (Error ∪ Messages)
forwardMessages = ForwardMessages -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
resendMessages :: Member TDLib r => ResendMessages -> Sem r (Error ∪ Messages)
resendMessages :: ResendMessages -> Sem r (Error ∪ Messages)
resendMessages = ResendMessages -> Sem r (Error ∪ Messages)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendChatSetTtlMessage :: Member TDLib r => SendChatSetTtlMessage -> Sem r (Error ∪ Message)
sendChatSetTtlMessage :: SendChatSetTtlMessage -> Sem r (Error ∪ Message)
sendChatSetTtlMessage = SendChatSetTtlMessage -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendChatScreenshotTakenNotification :: Member TDLib r => SendChatScreenshotTakenNotification -> Sem r (Error ∪ Ok)
sendChatScreenshotTakenNotification :: SendChatScreenshotTakenNotification -> Sem r (Error ∪ Ok)
sendChatScreenshotTakenNotification = SendChatScreenshotTakenNotification -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addLocalMessage :: Member TDLib r => AddLocalMessage -> Sem r (Error ∪ Message)
addLocalMessage :: AddLocalMessage -> Sem r (Error ∪ Message)
addLocalMessage = AddLocalMessage -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteMessages :: Member TDLib r => DeleteMessages -> Sem r (Error ∪ Ok)
deleteMessages :: DeleteMessages -> Sem r (Error ∪ Ok)
deleteMessages = DeleteMessages -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteChatMessagesFromUser :: Member TDLib r => DeleteChatMessagesFromUser -> Sem r (Error ∪ Ok)
deleteChatMessagesFromUser :: DeleteChatMessagesFromUser -> Sem r (Error ∪ Ok)
deleteChatMessagesFromUser = DeleteChatMessagesFromUser -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editMessageText :: Member TDLib r => EditMessageText -> Sem r (Error ∪ Message)
editMessageText :: EditMessageText -> Sem r (Error ∪ Message)
editMessageText = EditMessageText -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editMessageLiveLocation :: Member TDLib r => EditMessageLiveLocation -> Sem r (Error ∪ Message)
editMessageLiveLocation :: EditMessageLiveLocation -> Sem r (Error ∪ Message)
editMessageLiveLocation = EditMessageLiveLocation -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editMessageMedia :: Member TDLib r => EditMessageMedia -> Sem r (Error ∪ Message)
editMessageMedia :: EditMessageMedia -> Sem r (Error ∪ Message)
editMessageMedia = EditMessageMedia -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editMessageCaption :: Member TDLib r => EditMessageCaption -> Sem r (Error ∪ Message)
editMessageCaption :: EditMessageCaption -> Sem r (Error ∪ Message)
editMessageCaption = EditMessageCaption -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editMessageReplyMarkup :: Member TDLib r => EditMessageReplyMarkup -> Sem r (Error ∪ Message)
editMessageReplyMarkup :: EditMessageReplyMarkup -> Sem r (Error ∪ Message)
editMessageReplyMarkup = EditMessageReplyMarkup -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editInlineMessageText :: Member TDLib r => EditInlineMessageText -> Sem r (Error ∪ Ok)
editInlineMessageText :: EditInlineMessageText -> Sem r (Error ∪ Ok)
editInlineMessageText = EditInlineMessageText -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editInlineMessageLiveLocation :: Member TDLib r => EditInlineMessageLiveLocation -> Sem r (Error ∪ Ok)
editInlineMessageLiveLocation :: EditInlineMessageLiveLocation -> Sem r (Error ∪ Ok)
editInlineMessageLiveLocation = EditInlineMessageLiveLocation -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editInlineMessageMedia :: Member TDLib r => EditInlineMessageMedia -> Sem r (Error ∪ Ok)
editInlineMessageMedia :: EditInlineMessageMedia -> Sem r (Error ∪ Ok)
editInlineMessageMedia = EditInlineMessageMedia -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editInlineMessageCaption :: Member TDLib r => EditInlineMessageCaption -> Sem r (Error ∪ Ok)
editInlineMessageCaption :: EditInlineMessageCaption -> Sem r (Error ∪ Ok)
editInlineMessageCaption = EditInlineMessageCaption -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editInlineMessageReplyMarkup :: Member TDLib r => EditInlineMessageReplyMarkup -> Sem r (Error ∪ Ok)
editInlineMessageReplyMarkup :: EditInlineMessageReplyMarkup -> Sem r (Error ∪ Ok)
editInlineMessageReplyMarkup = EditInlineMessageReplyMarkup -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editMessageSchedulingState :: Member TDLib r => EditMessageSchedulingState -> Sem r (Error ∪ Ok)
editMessageSchedulingState :: EditMessageSchedulingState -> Sem r (Error ∪ Ok)
editMessageSchedulingState = EditMessageSchedulingState -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getTextEntities :: Member TDLib r => GetTextEntities -> Sem r (Error ∪ TextEntities)
getTextEntities :: GetTextEntities -> Sem r (Error ∪ TextEntities)
getTextEntities = GetTextEntities -> Sem r (Error ∪ TextEntities)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
parseTextEntities :: Member TDLib r => ParseTextEntities -> Sem r (Error ∪ FormattedText)
parseTextEntities :: ParseTextEntities -> Sem r (Error ∪ FormattedText)
parseTextEntities = ParseTextEntities -> Sem r (Error ∪ FormattedText)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
parseMarkdown :: Member TDLib r => ParseMarkdown -> Sem r (Error ∪ FormattedText)
parseMarkdown :: ParseMarkdown -> Sem r (Error ∪ FormattedText)
parseMarkdown = ParseMarkdown -> Sem r (Error ∪ FormattedText)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getMarkdownText :: Member TDLib r => GetMarkdownText -> Sem r (Error ∪ FormattedText)
getMarkdownText :: GetMarkdownText -> Sem r (Error ∪ FormattedText)
getMarkdownText = GetMarkdownText -> Sem r (Error ∪ FormattedText)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getFileMimeType :: Member TDLib r => GetFileMimeType -> Sem r (Error ∪ Text)
getFileMimeType :: GetFileMimeType -> Sem r (Error ∪ Text)
getFileMimeType = GetFileMimeType -> Sem r (Error ∪ Text)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getFileExtension :: Member TDLib r => GetFileExtension -> Sem r (Error ∪ Text)
getFileExtension :: GetFileExtension -> Sem r (Error ∪ Text)
getFileExtension = GetFileExtension -> Sem r (Error ∪ Text)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
cleanFileName :: Member TDLib r => CleanFileName -> Sem r (Error ∪ Text)
cleanFileName :: CleanFileName -> Sem r (Error ∪ Text)
cleanFileName = CleanFileName -> Sem r (Error ∪ Text)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getLanguagePackString :: Member TDLib r => GetLanguagePackString -> Sem r (Error ∪ LanguagePackStringValue)
getLanguagePackString :: GetLanguagePackString -> Sem r (Error ∪ LanguagePackStringValue)
getLanguagePackString = GetLanguagePackString -> Sem r (Error ∪ LanguagePackStringValue)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getJsonValue :: Member TDLib r => GetJsonValue -> Sem r (Error ∪ JsonValue)
getJsonValue :: GetJsonValue -> Sem r (Error ∪ JsonValue)
getJsonValue = GetJsonValue -> Sem r (Error ∪ JsonValue)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getJsonString :: Member TDLib r => GetJsonString -> Sem r (Error ∪ Text)
getJsonString :: GetJsonString -> Sem r (Error ∪ Text)
getJsonString = GetJsonString -> Sem r (Error ∪ Text)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setPollAnswer :: Member TDLib r => SetPollAnswer -> Sem r (Error ∪ Ok)
setPollAnswer :: SetPollAnswer -> Sem r (Error ∪ Ok)
setPollAnswer = SetPollAnswer -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getPollVoters :: Member TDLib r => GetPollVoters -> Sem r (Error ∪ Users)
getPollVoters :: GetPollVoters -> Sem r (Error ∪ Users)
getPollVoters = GetPollVoters -> Sem r (Error ∪ Users)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
stopPoll :: Member TDLib r => StopPoll -> Sem r (Error ∪ Ok)
stopPoll :: StopPoll -> Sem r (Error ∪ Ok)
stopPoll = StopPoll -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getLoginUrlInfo :: Member TDLib r => GetLoginUrlInfo -> Sem r (Error ∪ LoginUrlInfo)
getLoginUrlInfo :: GetLoginUrlInfo -> Sem r (Error ∪ LoginUrlInfo)
getLoginUrlInfo = GetLoginUrlInfo -> Sem r (Error ∪ LoginUrlInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getLoginUrl :: Member TDLib r => GetLoginUrl -> Sem r (Error ∪ HttpUrl)
getLoginUrl :: GetLoginUrl -> Sem r (Error ∪ HttpUrl)
getLoginUrl = GetLoginUrl -> Sem r (Error ∪ HttpUrl)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getInlineQueryResults :: Member TDLib r => GetInlineQueryResults -> Sem r (Error ∪ InlineQueryResults)
getInlineQueryResults :: GetInlineQueryResults -> Sem r (Error ∪ InlineQueryResults)
getInlineQueryResults = GetInlineQueryResults -> Sem r (Error ∪ InlineQueryResults)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
answerInlineQuery :: Member TDLib r => AnswerInlineQuery -> Sem r (Error ∪ Ok)
answerInlineQuery :: AnswerInlineQuery -> Sem r (Error ∪ Ok)
answerInlineQuery = AnswerInlineQuery -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getCallbackQueryAnswer :: Member TDLib r => GetCallbackQueryAnswer -> Sem r (Error ∪ CallbackQueryAnswer)
getCallbackQueryAnswer :: GetCallbackQueryAnswer -> Sem r (Error ∪ CallbackQueryAnswer)
getCallbackQueryAnswer = GetCallbackQueryAnswer -> Sem r (Error ∪ CallbackQueryAnswer)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
answerCallbackQuery :: Member TDLib r => AnswerCallbackQuery -> Sem r (Error ∪ Ok)
answerCallbackQuery :: AnswerCallbackQuery -> Sem r (Error ∪ Ok)
answerCallbackQuery = AnswerCallbackQuery -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
answerShippingQuery :: Member TDLib r => AnswerShippingQuery -> Sem r (Error ∪ Ok)
answerShippingQuery :: AnswerShippingQuery -> Sem r (Error ∪ Ok)
answerShippingQuery = AnswerShippingQuery -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
answerPreCheckoutQuery :: Member TDLib r => AnswerPreCheckoutQuery -> Sem r (Error ∪ Ok)
answerPreCheckoutQuery :: AnswerPreCheckoutQuery -> Sem r (Error ∪ Ok)
answerPreCheckoutQuery = AnswerPreCheckoutQuery -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setGameScore :: Member TDLib r => SetGameScore -> Sem r (Error ∪ Message)
setGameScore :: SetGameScore -> Sem r (Error ∪ Message)
setGameScore = SetGameScore -> Sem r (Error ∪ Message)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setInlineGameScore :: Member TDLib r => SetInlineGameScore -> Sem r (Error ∪ Ok)
setInlineGameScore :: SetInlineGameScore -> Sem r (Error ∪ Ok)
setInlineGameScore = SetInlineGameScore -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getGameHighScores :: Member TDLib r => GetGameHighScores -> Sem r (Error ∪ GameHighScores)
getGameHighScores :: GetGameHighScores -> Sem r (Error ∪ GameHighScores)
getGameHighScores = GetGameHighScores -> Sem r (Error ∪ GameHighScores)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getInlineGameHighScores :: Member TDLib r => GetInlineGameHighScores -> Sem r (Error ∪ GameHighScores)
getInlineGameHighScores :: GetInlineGameHighScores -> Sem r (Error ∪ GameHighScores)
getInlineGameHighScores = GetInlineGameHighScores -> Sem r (Error ∪ GameHighScores)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteChatReplyMarkup :: Member TDLib r => DeleteChatReplyMarkup -> Sem r (Error ∪ Ok)
deleteChatReplyMarkup :: DeleteChatReplyMarkup -> Sem r (Error ∪ Ok)
deleteChatReplyMarkup = DeleteChatReplyMarkup -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendChatAction :: Member TDLib r => SendChatAction -> Sem r (Error ∪ Ok)
sendChatAction :: SendChatAction -> Sem r (Error ∪ Ok)
sendChatAction = SendChatAction -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
openChat :: Member TDLib r => OpenChat -> Sem r (Error ∪ Ok)
openChat :: OpenChat -> Sem r (Error ∪ Ok)
openChat = OpenChat -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
closeChat :: Member TDLib r => CloseChat -> Sem r (Error ∪ Ok)
closeChat :: CloseChat -> Sem r (Error ∪ Ok)
closeChat = CloseChat -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
viewMessages :: Member TDLib r => ViewMessages -> Sem r (Error ∪ Ok)
viewMessages :: ViewMessages -> Sem r (Error ∪ Ok)
viewMessages = ViewMessages -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
openMessageContent :: Member TDLib r => OpenMessageContent -> Sem r (Error ∪ Ok)
openMessageContent :: OpenMessageContent -> Sem r (Error ∪ Ok)
openMessageContent = OpenMessageContent -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
readAllChatMentions :: Member TDLib r => ReadAllChatMentions -> Sem r (Error ∪ Ok)
readAllChatMentions :: ReadAllChatMentions -> Sem r (Error ∪ Ok)
readAllChatMentions = ReadAllChatMentions -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
createPrivateChat :: Member TDLib r => CreatePrivateChat -> Sem r (Error ∪ Chat)
createPrivateChat :: CreatePrivateChat -> Sem r (Error ∪ Chat)
createPrivateChat = CreatePrivateChat -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
createBasicGroupChat :: Member TDLib r => CreateBasicGroupChat -> Sem r (Error ∪ Chat)
createBasicGroupChat :: CreateBasicGroupChat -> Sem r (Error ∪ Chat)
createBasicGroupChat = CreateBasicGroupChat -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
createSupergroupChat :: Member TDLib r => CreateSupergroupChat -> Sem r (Error ∪ Chat)
createSupergroupChat :: CreateSupergroupChat -> Sem r (Error ∪ Chat)
createSupergroupChat = CreateSupergroupChat -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
createSecretChat :: Member TDLib r => CreateSecretChat -> Sem r (Error ∪ Chat)
createSecretChat :: CreateSecretChat -> Sem r (Error ∪ Chat)
createSecretChat = CreateSecretChat -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
createNewBasicGroupChat :: Member TDLib r => CreateNewBasicGroupChat -> Sem r (Error ∪ Chat)
createNewBasicGroupChat :: CreateNewBasicGroupChat -> Sem r (Error ∪ Chat)
createNewBasicGroupChat = CreateNewBasicGroupChat -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
createNewSupergroupChat :: Member TDLib r => CreateNewSupergroupChat -> Sem r (Error ∪ Chat)
createNewSupergroupChat :: CreateNewSupergroupChat -> Sem r (Error ∪ Chat)
createNewSupergroupChat = CreateNewSupergroupChat -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
createNewSecretChat :: Member TDLib r => CreateNewSecretChat -> Sem r (Error ∪ Chat)
createNewSecretChat :: CreateNewSecretChat -> Sem r (Error ∪ Chat)
createNewSecretChat = CreateNewSecretChat -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
upgradeBasicGroupChatToSupergroupChat :: Member TDLib r => UpgradeBasicGroupChatToSupergroupChat -> Sem r (Error ∪ Chat)
upgradeBasicGroupChatToSupergroupChat :: UpgradeBasicGroupChatToSupergroupChat -> Sem r (Error ∪ Chat)
upgradeBasicGroupChatToSupergroupChat = UpgradeBasicGroupChatToSupergroupChat -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatChatList :: Member TDLib r => SetChatChatList -> Sem r (Error ∪ Ok)
setChatChatList :: SetChatChatList -> Sem r (Error ∪ Ok)
setChatChatList = SetChatChatList -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatTitle :: Member TDLib r => SetChatTitle -> Sem r (Error ∪ Ok)
setChatTitle :: SetChatTitle -> Sem r (Error ∪ Ok)
setChatTitle = SetChatTitle -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatPhoto :: Member TDLib r => SetChatPhoto -> Sem r (Error ∪ Ok)
setChatPhoto :: SetChatPhoto -> Sem r (Error ∪ Ok)
setChatPhoto = SetChatPhoto -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatPermissions :: Member TDLib r => SetChatPermissions -> Sem r (Error ∪ Ok)
setChatPermissions :: SetChatPermissions -> Sem r (Error ∪ Ok)
setChatPermissions = SetChatPermissions -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatDraftMessage :: Member TDLib r => SetChatDraftMessage -> Sem r (Error ∪ Ok)
setChatDraftMessage :: SetChatDraftMessage -> Sem r (Error ∪ Ok)
setChatDraftMessage = SetChatDraftMessage -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatNotificationSettings :: Member TDLib r => SetChatNotificationSettings -> Sem r (Error ∪ Ok)
setChatNotificationSettings :: SetChatNotificationSettings -> Sem r (Error ∪ Ok)
setChatNotificationSettings = SetChatNotificationSettings -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
toggleChatIsPinned :: Member TDLib r => ToggleChatIsPinned -> Sem r (Error ∪ Ok)
toggleChatIsPinned :: ToggleChatIsPinned -> Sem r (Error ∪ Ok)
toggleChatIsPinned = ToggleChatIsPinned -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
toggleChatIsMarkedAsUnread :: Member TDLib r => ToggleChatIsMarkedAsUnread -> Sem r (Error ∪ Ok)
toggleChatIsMarkedAsUnread :: ToggleChatIsMarkedAsUnread -> Sem r (Error ∪ Ok)
toggleChatIsMarkedAsUnread = ToggleChatIsMarkedAsUnread -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
toggleChatDefaultDisableNotification :: Member TDLib r => ToggleChatDefaultDisableNotification -> Sem r (Error ∪ Ok)
toggleChatDefaultDisableNotification :: ToggleChatDefaultDisableNotification -> Sem r (Error ∪ Ok)
toggleChatDefaultDisableNotification = ToggleChatDefaultDisableNotification -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatClientData :: Member TDLib r => SetChatClientData -> Sem r (Error ∪ Ok)
setChatClientData :: SetChatClientData -> Sem r (Error ∪ Ok)
setChatClientData = SetChatClientData -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatDescription :: Member TDLib r => SetChatDescription -> Sem r (Error ∪ Ok)
setChatDescription :: SetChatDescription -> Sem r (Error ∪ Ok)
setChatDescription = SetChatDescription -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatDiscussionGroup :: Member TDLib r => SetChatDiscussionGroup -> Sem r (Error ∪ Ok)
setChatDiscussionGroup :: SetChatDiscussionGroup -> Sem r (Error ∪ Ok)
setChatDiscussionGroup = SetChatDiscussionGroup -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatLocation :: Member TDLib r => SetChatLocation -> Sem r (Error ∪ Ok)
setChatLocation :: SetChatLocation -> Sem r (Error ∪ Ok)
setChatLocation = SetChatLocation -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatSlowModeDelay :: Member TDLib r => SetChatSlowModeDelay -> Sem r (Error ∪ Ok)
setChatSlowModeDelay :: SetChatSlowModeDelay -> Sem r (Error ∪ Ok)
setChatSlowModeDelay = SetChatSlowModeDelay -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
pinChatMessage :: Member TDLib r => PinChatMessage -> Sem r (Error ∪ Ok)
pinChatMessage :: PinChatMessage -> Sem r (Error ∪ Ok)
pinChatMessage = PinChatMessage -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
unpinChatMessage :: Member TDLib r => UnpinChatMessage -> Sem r (Error ∪ Ok)
unpinChatMessage :: UnpinChatMessage -> Sem r (Error ∪ Ok)
unpinChatMessage = UnpinChatMessage -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
joinChat :: Member TDLib r => JoinChat -> Sem r (Error ∪ Ok)
joinChat :: JoinChat -> Sem r (Error ∪ Ok)
joinChat = JoinChat -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
leaveChat :: Member TDLib r => LeaveChat -> Sem r (Error ∪ Ok)
leaveChat :: LeaveChat -> Sem r (Error ∪ Ok)
leaveChat = LeaveChat -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addChatMember :: Member TDLib r => AddChatMember -> Sem r (Error ∪ Ok)
addChatMember :: AddChatMember -> Sem r (Error ∪ Ok)
addChatMember = AddChatMember -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addChatMembers :: Member TDLib r => AddChatMembers -> Sem r (Error ∪ Ok)
addChatMembers :: AddChatMembers -> Sem r (Error ∪ Ok)
addChatMembers = AddChatMembers -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setChatMemberStatus :: Member TDLib r => SetChatMemberStatus -> Sem r (Error ∪ Ok)
setChatMemberStatus :: SetChatMemberStatus -> Sem r (Error ∪ Ok)
setChatMemberStatus = SetChatMemberStatus -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
canTransferOwnership :: Member TDLib r => CanTransferOwnership -> Sem r (Error ∪ CanTransferOwnershipResult)
canTransferOwnership :: CanTransferOwnership -> Sem r (Error ∪ CanTransferOwnershipResult)
canTransferOwnership = CanTransferOwnership -> Sem r (Error ∪ CanTransferOwnershipResult)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
transferChatOwnership :: Member TDLib r => TransferChatOwnership -> Sem r (Error ∪ Ok)
transferChatOwnership :: TransferChatOwnership -> Sem r (Error ∪ Ok)
transferChatOwnership = TransferChatOwnership -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatMember :: Member TDLib r => GetChatMember -> Sem r (Error ∪ ChatMember)
getChatMember :: GetChatMember -> Sem r (Error ∪ ChatMember)
getChatMember = GetChatMember -> Sem r (Error ∪ ChatMember)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchChatMembers :: Member TDLib r => SearchChatMembers -> Sem r (Error ∪ ChatMembers)
searchChatMembers :: SearchChatMembers -> Sem r (Error ∪ ChatMembers)
searchChatMembers = SearchChatMembers -> Sem r (Error ∪ ChatMembers)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatAdministrators :: Member TDLib r => GetChatAdministrators -> Sem r (Error ∪ ChatAdministrators)
getChatAdministrators :: GetChatAdministrators -> Sem r (Error ∪ ChatAdministrators)
getChatAdministrators = GetChatAdministrators -> Sem r (Error ∪ ChatAdministrators)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
clearAllDraftMessages :: Member TDLib r => ClearAllDraftMessages -> Sem r (Error ∪ Ok)
clearAllDraftMessages :: ClearAllDraftMessages -> Sem r (Error ∪ Ok)
clearAllDraftMessages = ClearAllDraftMessages -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatNotificationSettingsExceptions :: Member TDLib r => GetChatNotificationSettingsExceptions -> Sem r (Error ∪ Chats)
getChatNotificationSettingsExceptions :: GetChatNotificationSettingsExceptions -> Sem r (Error ∪ Chats)
getChatNotificationSettingsExceptions = GetChatNotificationSettingsExceptions -> Sem r (Error ∪ Chats)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getScopeNotificationSettings :: Member TDLib r => GetScopeNotificationSettings -> Sem r (Error ∪ ScopeNotificationSettings)
getScopeNotificationSettings :: GetScopeNotificationSettings
-> Sem r (Error ∪ ScopeNotificationSettings)
getScopeNotificationSettings = GetScopeNotificationSettings
-> Sem r (Error ∪ ScopeNotificationSettings)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setScopeNotificationSettings :: Member TDLib r => SetScopeNotificationSettings -> Sem r (Error ∪ Ok)
setScopeNotificationSettings :: SetScopeNotificationSettings -> Sem r (Error ∪ Ok)
setScopeNotificationSettings = SetScopeNotificationSettings -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
resetAllNotificationSettings :: Member TDLib r => ResetAllNotificationSettings -> Sem r (Error ∪ Ok)
resetAllNotificationSettings :: ResetAllNotificationSettings -> Sem r (Error ∪ Ok)
resetAllNotificationSettings = ResetAllNotificationSettings -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setPinnedChats :: Member TDLib r => SetPinnedChats -> Sem r (Error ∪ Ok)
setPinnedChats :: SetPinnedChats -> Sem r (Error ∪ Ok)
setPinnedChats = SetPinnedChats -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
downloadFile :: Member TDLib r => DownloadFile -> Sem r (Error ∪ File)
downloadFile :: DownloadFile -> Sem r (Error ∪ File)
downloadFile = DownloadFile -> Sem r (Error ∪ File)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getFileDownloadedPrefixSize :: Member TDLib r => GetFileDownloadedPrefixSize -> Sem r (Error ∪ Count)
getFileDownloadedPrefixSize :: GetFileDownloadedPrefixSize -> Sem r (Error ∪ Count)
getFileDownloadedPrefixSize = GetFileDownloadedPrefixSize -> Sem r (Error ∪ Count)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
cancelDownloadFile :: Member TDLib r => CancelDownloadFile -> Sem r (Error ∪ Ok)
cancelDownloadFile :: CancelDownloadFile -> Sem r (Error ∪ Ok)
cancelDownloadFile = CancelDownloadFile -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
uploadFile :: Member TDLib r => UploadFile -> Sem r (Error ∪ File)
uploadFile :: UploadFile -> Sem r (Error ∪ File)
uploadFile = UploadFile -> Sem r (Error ∪ File)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
cancelUploadFile :: Member TDLib r => CancelUploadFile -> Sem r (Error ∪ Ok)
cancelUploadFile :: CancelUploadFile -> Sem r (Error ∪ Ok)
cancelUploadFile = CancelUploadFile -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
writeGeneratedFilePart :: Member TDLib r => WriteGeneratedFilePart -> Sem r (Error ∪ Ok)
writeGeneratedFilePart :: WriteGeneratedFilePart -> Sem r (Error ∪ Ok)
writeGeneratedFilePart = WriteGeneratedFilePart -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setFileGenerationProgress :: Member TDLib r => SetFileGenerationProgress -> Sem r (Error ∪ Ok)
setFileGenerationProgress :: SetFileGenerationProgress -> Sem r (Error ∪ Ok)
setFileGenerationProgress = SetFileGenerationProgress -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
finishFileGeneration :: Member TDLib r => FinishFileGeneration -> Sem r (Error ∪ Ok)
finishFileGeneration :: FinishFileGeneration -> Sem r (Error ∪ Ok)
finishFileGeneration = FinishFileGeneration -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
readFilePart :: Member TDLib r => ReadFilePart -> Sem r (Error ∪ FilePart)
readFilePart :: ReadFilePart -> Sem r (Error ∪ FilePart)
readFilePart = ReadFilePart -> Sem r (Error ∪ FilePart)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteFile :: Member TDLib r => DeleteFile -> Sem r (Error ∪ Ok)
deleteFile :: DeleteFile -> Sem r (Error ∪ Ok)
deleteFile = DeleteFile -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
generateChatInviteLink :: Member TDLib r => GenerateChatInviteLink -> Sem r (Error ∪ ChatInviteLink)
generateChatInviteLink :: GenerateChatInviteLink -> Sem r (Error ∪ ChatInviteLink)
generateChatInviteLink = GenerateChatInviteLink -> Sem r (Error ∪ ChatInviteLink)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkChatInviteLink :: Member TDLib r => CheckChatInviteLink -> Sem r (Error ∪ ChatInviteLinkInfo)
checkChatInviteLink :: CheckChatInviteLink -> Sem r (Error ∪ ChatInviteLinkInfo)
checkChatInviteLink = CheckChatInviteLink -> Sem r (Error ∪ ChatInviteLinkInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
joinChatByInviteLink :: Member TDLib r => JoinChatByInviteLink -> Sem r (Error ∪ Chat)
joinChatByInviteLink :: JoinChatByInviteLink -> Sem r (Error ∪ Chat)
joinChatByInviteLink = JoinChatByInviteLink -> Sem r (Error ∪ Chat)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
createCall :: Member TDLib r => CreateCall -> Sem r (Error ∪ CallId)
createCall :: CreateCall -> Sem r (Error ∪ CallId)
createCall = CreateCall -> Sem r (Error ∪ CallId)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
acceptCall :: Member TDLib r => AcceptCall -> Sem r (Error ∪ Ok)
acceptCall :: AcceptCall -> Sem r (Error ∪ Ok)
acceptCall = AcceptCall -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
discardCall :: Member TDLib r => DiscardCall -> Sem r (Error ∪ Ok)
discardCall :: DiscardCall -> Sem r (Error ∪ Ok)
discardCall = DiscardCall -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendCallRating :: Member TDLib r => SendCallRating -> Sem r (Error ∪ Ok)
sendCallRating :: SendCallRating -> Sem r (Error ∪ Ok)
sendCallRating = SendCallRating -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendCallDebugInformation :: Member TDLib r => SendCallDebugInformation -> Sem r (Error ∪ Ok)
sendCallDebugInformation :: SendCallDebugInformation -> Sem r (Error ∪ Ok)
sendCallDebugInformation = SendCallDebugInformation -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
blockUser :: Member TDLib r => BlockUser -> Sem r (Error ∪ Ok)
blockUser :: BlockUser -> Sem r (Error ∪ Ok)
blockUser = BlockUser -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
unblockUser :: Member TDLib r => UnblockUser -> Sem r (Error ∪ Ok)
unblockUser :: UnblockUser -> Sem r (Error ∪ Ok)
unblockUser = UnblockUser -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getBlockedUsers :: Member TDLib r => GetBlockedUsers -> Sem r (Error ∪ Users)
getBlockedUsers :: GetBlockedUsers -> Sem r (Error ∪ Users)
getBlockedUsers = GetBlockedUsers -> Sem r (Error ∪ Users)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addContact :: Member TDLib r => AddContact -> Sem r (Error ∪ Ok)
addContact :: AddContact -> Sem r (Error ∪ Ok)
addContact = AddContact -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
importContacts :: Member TDLib r => ImportContacts -> Sem r (Error ∪ ImportedContacts)
importContacts :: ImportContacts -> Sem r (Error ∪ ImportedContacts)
importContacts = ImportContacts -> Sem r (Error ∪ ImportedContacts)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getContacts :: Member TDLib r => GetContacts -> Sem r (Error ∪ Users)
getContacts :: GetContacts -> Sem r (Error ∪ Users)
getContacts = GetContacts -> Sem r (Error ∪ Users)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchContacts :: Member TDLib r => SearchContacts -> Sem r (Error ∪ Users)
searchContacts :: SearchContacts -> Sem r (Error ∪ Users)
searchContacts = SearchContacts -> Sem r (Error ∪ Users)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeContacts :: Member TDLib r => RemoveContacts -> Sem r (Error ∪ Ok)
removeContacts :: RemoveContacts -> Sem r (Error ∪ Ok)
removeContacts = RemoveContacts -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getImportedContactCount :: Member TDLib r => GetImportedContactCount -> Sem r (Error ∪ Count)
getImportedContactCount :: GetImportedContactCount -> Sem r (Error ∪ Count)
getImportedContactCount = GetImportedContactCount -> Sem r (Error ∪ Count)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
changeImportedContacts :: Member TDLib r => ChangeImportedContacts -> Sem r (Error ∪ ImportedContacts)
changeImportedContacts :: ChangeImportedContacts -> Sem r (Error ∪ ImportedContacts)
changeImportedContacts = ChangeImportedContacts -> Sem r (Error ∪ ImportedContacts)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
clearImportedContacts :: Member TDLib r => ClearImportedContacts -> Sem r (Error ∪ Ok)
clearImportedContacts :: ClearImportedContacts -> Sem r (Error ∪ Ok)
clearImportedContacts = ClearImportedContacts -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sharePhoneNumber :: Member TDLib r => SharePhoneNumber -> Sem r (Error ∪ Ok)
sharePhoneNumber :: SharePhoneNumber -> Sem r (Error ∪ Ok)
sharePhoneNumber = SharePhoneNumber -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getUserProfilePhotos :: Member TDLib r => GetUserProfilePhotos -> Sem r (Error ∪ UserProfilePhotos)
getUserProfilePhotos :: GetUserProfilePhotos -> Sem r (Error ∪ UserProfilePhotos)
getUserProfilePhotos = GetUserProfilePhotos -> Sem r (Error ∪ UserProfilePhotos)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getStickers :: Member TDLib r => GetStickers -> Sem r (Error ∪ Stickers)
getStickers :: GetStickers -> Sem r (Error ∪ Stickers)
getStickers = GetStickers -> Sem r (Error ∪ Stickers)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchStickers :: Member TDLib r => SearchStickers -> Sem r (Error ∪ Stickers)
searchStickers :: SearchStickers -> Sem r (Error ∪ Stickers)
searchStickers = SearchStickers -> Sem r (Error ∪ Stickers)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getInstalledStickerSets :: Member TDLib r => GetInstalledStickerSets -> Sem r (Error ∪ StickerSets)
getInstalledStickerSets :: GetInstalledStickerSets -> Sem r (Error ∪ StickerSets)
getInstalledStickerSets = GetInstalledStickerSets -> Sem r (Error ∪ StickerSets)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getArchivedStickerSets :: Member TDLib r => GetArchivedStickerSets -> Sem r (Error ∪ StickerSets)
getArchivedStickerSets :: GetArchivedStickerSets -> Sem r (Error ∪ StickerSets)
getArchivedStickerSets = GetArchivedStickerSets -> Sem r (Error ∪ StickerSets)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getTrendingStickerSets :: Member TDLib r => GetTrendingStickerSets -> Sem r (Error ∪ StickerSets)
getTrendingStickerSets :: GetTrendingStickerSets -> Sem r (Error ∪ StickerSets)
getTrendingStickerSets = GetTrendingStickerSets -> Sem r (Error ∪ StickerSets)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getAttachedStickerSets :: Member TDLib r => GetAttachedStickerSets -> Sem r (Error ∪ StickerSets)
getAttachedStickerSets :: GetAttachedStickerSets -> Sem r (Error ∪ StickerSets)
getAttachedStickerSets = GetAttachedStickerSets -> Sem r (Error ∪ StickerSets)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getStickerSet :: Member TDLib r => GetStickerSet -> Sem r (Error ∪ StickerSet)
getStickerSet :: GetStickerSet -> Sem r (Error ∪ StickerSet)
getStickerSet = GetStickerSet -> Sem r (Error ∪ StickerSet)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchStickerSet :: Member TDLib r => SearchStickerSet -> Sem r (Error ∪ StickerSet)
searchStickerSet :: SearchStickerSet -> Sem r (Error ∪ StickerSet)
searchStickerSet = SearchStickerSet -> Sem r (Error ∪ StickerSet)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchInstalledStickerSets :: Member TDLib r => SearchInstalledStickerSets -> Sem r (Error ∪ StickerSets)
searchInstalledStickerSets :: SearchInstalledStickerSets -> Sem r (Error ∪ StickerSets)
searchInstalledStickerSets = SearchInstalledStickerSets -> Sem r (Error ∪ StickerSets)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchStickerSets :: Member TDLib r => SearchStickerSets -> Sem r (Error ∪ StickerSets)
searchStickerSets :: SearchStickerSets -> Sem r (Error ∪ StickerSets)
searchStickerSets = SearchStickerSets -> Sem r (Error ∪ StickerSets)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
changeStickerSet :: Member TDLib r => ChangeStickerSet -> Sem r (Error ∪ Ok)
changeStickerSet :: ChangeStickerSet -> Sem r (Error ∪ Ok)
changeStickerSet = ChangeStickerSet -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
viewTrendingStickerSets :: Member TDLib r => ViewTrendingStickerSets -> Sem r (Error ∪ Ok)
viewTrendingStickerSets :: ViewTrendingStickerSets -> Sem r (Error ∪ Ok)
viewTrendingStickerSets = ViewTrendingStickerSets -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
reorderInstalledStickerSets :: Member TDLib r => ReorderInstalledStickerSets -> Sem r (Error ∪ Ok)
reorderInstalledStickerSets :: ReorderInstalledStickerSets -> Sem r (Error ∪ Ok)
reorderInstalledStickerSets = ReorderInstalledStickerSets -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getRecentStickers :: Member TDLib r => GetRecentStickers -> Sem r (Error ∪ Stickers)
getRecentStickers :: GetRecentStickers -> Sem r (Error ∪ Stickers)
getRecentStickers = GetRecentStickers -> Sem r (Error ∪ Stickers)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addRecentSticker :: Member TDLib r => AddRecentSticker -> Sem r (Error ∪ Stickers)
addRecentSticker :: AddRecentSticker -> Sem r (Error ∪ Stickers)
addRecentSticker = AddRecentSticker -> Sem r (Error ∪ Stickers)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeRecentSticker :: Member TDLib r => RemoveRecentSticker -> Sem r (Error ∪ Ok)
removeRecentSticker :: RemoveRecentSticker -> Sem r (Error ∪ Ok)
removeRecentSticker = RemoveRecentSticker -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
clearRecentStickers :: Member TDLib r => ClearRecentStickers -> Sem r (Error ∪ Ok)
clearRecentStickers :: ClearRecentStickers -> Sem r (Error ∪ Ok)
clearRecentStickers = ClearRecentStickers -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getFavoriteStickers :: Member TDLib r => GetFavoriteStickers -> Sem r (Error ∪ Stickers)
getFavoriteStickers :: GetFavoriteStickers -> Sem r (Error ∪ Stickers)
getFavoriteStickers = GetFavoriteStickers -> Sem r (Error ∪ Stickers)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addFavoriteSticker :: Member TDLib r => AddFavoriteSticker -> Sem r (Error ∪ Ok)
addFavoriteSticker :: AddFavoriteSticker -> Sem r (Error ∪ Ok)
addFavoriteSticker = AddFavoriteSticker -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeFavoriteSticker :: Member TDLib r => RemoveFavoriteSticker -> Sem r (Error ∪ Ok)
removeFavoriteSticker :: RemoveFavoriteSticker -> Sem r (Error ∪ Ok)
removeFavoriteSticker = RemoveFavoriteSticker -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getStickerEmojis :: Member TDLib r => GetStickerEmojis -> Sem r (Error ∪ Emojis)
getStickerEmojis :: GetStickerEmojis -> Sem r (Error ∪ Emojis)
getStickerEmojis = GetStickerEmojis -> Sem r (Error ∪ Emojis)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchEmojis :: Member TDLib r => SearchEmojis -> Sem r (Error ∪ Emojis)
searchEmojis :: SearchEmojis -> Sem r (Error ∪ Emojis)
searchEmojis = SearchEmojis -> Sem r (Error ∪ Emojis)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getEmojiSuggestionsUrl :: Member TDLib r => GetEmojiSuggestionsUrl -> Sem r (Error ∪ HttpUrl)
getEmojiSuggestionsUrl :: GetEmojiSuggestionsUrl -> Sem r (Error ∪ HttpUrl)
getEmojiSuggestionsUrl = GetEmojiSuggestionsUrl -> Sem r (Error ∪ HttpUrl)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getSavedAnimations :: Member TDLib r => GetSavedAnimations -> Sem r (Error ∪ Animations)
getSavedAnimations :: GetSavedAnimations -> Sem r (Error ∪ Animations)
getSavedAnimations = GetSavedAnimations -> Sem r (Error ∪ Animations)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addSavedAnimation :: Member TDLib r => AddSavedAnimation -> Sem r (Error ∪ Ok)
addSavedAnimation :: AddSavedAnimation -> Sem r (Error ∪ Ok)
addSavedAnimation = AddSavedAnimation -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeSavedAnimation :: Member TDLib r => RemoveSavedAnimation -> Sem r (Error ∪ Ok)
removeSavedAnimation :: RemoveSavedAnimation -> Sem r (Error ∪ Ok)
removeSavedAnimation = RemoveSavedAnimation -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getRecentInlineBots :: Member TDLib r => GetRecentInlineBots -> Sem r (Error ∪ Users)
getRecentInlineBots :: GetRecentInlineBots -> Sem r (Error ∪ Users)
getRecentInlineBots = GetRecentInlineBots -> Sem r (Error ∪ Users)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchHashtags :: Member TDLib r => SearchHashtags -> Sem r (Error ∪ Hashtags)
searchHashtags :: SearchHashtags -> Sem r (Error ∪ Hashtags)
searchHashtags = SearchHashtags -> Sem r (Error ∪ Hashtags)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeRecentHashtag :: Member TDLib r => RemoveRecentHashtag -> Sem r (Error ∪ Ok)
removeRecentHashtag :: RemoveRecentHashtag -> Sem r (Error ∪ Ok)
removeRecentHashtag = RemoveRecentHashtag -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getWebPagePreview :: Member TDLib r => GetWebPagePreview -> Sem r (Error ∪ WebPage)
getWebPagePreview :: GetWebPagePreview -> Sem r (Error ∪ WebPage)
getWebPagePreview = GetWebPagePreview -> Sem r (Error ∪ WebPage)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getWebPageInstantView :: Member TDLib r => GetWebPageInstantView -> Sem r (Error ∪ WebPageInstantView)
getWebPageInstantView :: GetWebPageInstantView -> Sem r (Error ∪ WebPageInstantView)
getWebPageInstantView = GetWebPageInstantView -> Sem r (Error ∪ WebPageInstantView)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setProfilePhoto :: Member TDLib r => SetProfilePhoto -> Sem r (Error ∪ Ok)
setProfilePhoto :: SetProfilePhoto -> Sem r (Error ∪ Ok)
setProfilePhoto = SetProfilePhoto -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteProfilePhoto :: Member TDLib r => DeleteProfilePhoto -> Sem r (Error ∪ Ok)
deleteProfilePhoto :: DeleteProfilePhoto -> Sem r (Error ∪ Ok)
deleteProfilePhoto = DeleteProfilePhoto -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setName :: Member TDLib r => SetName -> Sem r (Error ∪ Ok)
setName :: SetName -> Sem r (Error ∪ Ok)
setName = SetName -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setBio :: Member TDLib r => SetBio -> Sem r (Error ∪ Ok)
setBio :: SetBio -> Sem r (Error ∪ Ok)
setBio = SetBio -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setUsername :: Member TDLib r => SetUsername -> Sem r (Error ∪ Ok)
setUsername :: SetUsername -> Sem r (Error ∪ Ok)
setUsername = SetUsername -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setLocation :: Member TDLib r => SetLocation -> Sem r (Error ∪ Ok)
setLocation :: SetLocation -> Sem r (Error ∪ Ok)
setLocation = SetLocation -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
changePhoneNumber :: Member TDLib r => ChangePhoneNumber -> Sem r (Error ∪ AuthenticationCodeInfo)
changePhoneNumber :: ChangePhoneNumber -> Sem r (Error ∪ AuthenticationCodeInfo)
changePhoneNumber = ChangePhoneNumber -> Sem r (Error ∪ AuthenticationCodeInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
resendChangePhoneNumberCode :: Member TDLib r => ResendChangePhoneNumberCode -> Sem r (Error ∪ AuthenticationCodeInfo)
resendChangePhoneNumberCode :: ResendChangePhoneNumberCode
-> Sem r (Error ∪ AuthenticationCodeInfo)
resendChangePhoneNumberCode = ResendChangePhoneNumberCode
-> Sem r (Error ∪ AuthenticationCodeInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkChangePhoneNumberCode :: Member TDLib r => CheckChangePhoneNumberCode -> Sem r (Error ∪ Ok)
checkChangePhoneNumberCode :: CheckChangePhoneNumberCode -> Sem r (Error ∪ Ok)
checkChangePhoneNumberCode = CheckChangePhoneNumberCode -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setCommands :: Member TDLib r => SetCommands -> Sem r (Error ∪ Ok)
setCommands :: SetCommands -> Sem r (Error ∪ Ok)
setCommands = SetCommands -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getActiveSessions :: Member TDLib r => GetActiveSessions -> Sem r (Error ∪ Sessions)
getActiveSessions :: GetActiveSessions -> Sem r (Error ∪ Sessions)
getActiveSessions = GetActiveSessions -> Sem r (Error ∪ Sessions)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
terminateSession :: Member TDLib r => TerminateSession -> Sem r (Error ∪ Ok)
terminateSession :: TerminateSession -> Sem r (Error ∪ Ok)
terminateSession = TerminateSession -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
terminateAllOtherSessions :: Member TDLib r => TerminateAllOtherSessions -> Sem r (Error ∪ Ok)
terminateAllOtherSessions :: TerminateAllOtherSessions -> Sem r (Error ∪ Ok)
terminateAllOtherSessions = TerminateAllOtherSessions -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getConnectedWebsites :: Member TDLib r => GetConnectedWebsites -> Sem r (Error ∪ ConnectedWebsites)
getConnectedWebsites :: GetConnectedWebsites -> Sem r (Error ∪ ConnectedWebsites)
getConnectedWebsites = GetConnectedWebsites -> Sem r (Error ∪ ConnectedWebsites)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
disconnectWebsite :: Member TDLib r => DisconnectWebsite -> Sem r (Error ∪ Ok)
disconnectWebsite :: DisconnectWebsite -> Sem r (Error ∪ Ok)
disconnectWebsite = DisconnectWebsite -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
disconnectAllWebsites :: Member TDLib r => DisconnectAllWebsites -> Sem r (Error ∪ Ok)
disconnectAllWebsites :: DisconnectAllWebsites -> Sem r (Error ∪ Ok)
disconnectAllWebsites = DisconnectAllWebsites -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setSupergroupUsername :: Member TDLib r => SetSupergroupUsername -> Sem r (Error ∪ Ok)
setSupergroupUsername :: SetSupergroupUsername -> Sem r (Error ∪ Ok)
setSupergroupUsername = SetSupergroupUsername -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setSupergroupStickerSet :: Member TDLib r => SetSupergroupStickerSet -> Sem r (Error ∪ Ok)
setSupergroupStickerSet :: SetSupergroupStickerSet -> Sem r (Error ∪ Ok)
setSupergroupStickerSet = SetSupergroupStickerSet -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
toggleSupergroupSignMessages :: Member TDLib r => ToggleSupergroupSignMessages -> Sem r (Error ∪ Ok)
toggleSupergroupSignMessages :: ToggleSupergroupSignMessages -> Sem r (Error ∪ Ok)
toggleSupergroupSignMessages = ToggleSupergroupSignMessages -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
toggleSupergroupIsAllHistoryAvailable :: Member TDLib r => ToggleSupergroupIsAllHistoryAvailable -> Sem r (Error ∪ Ok)
toggleSupergroupIsAllHistoryAvailable :: ToggleSupergroupIsAllHistoryAvailable -> Sem r (Error ∪ Ok)
toggleSupergroupIsAllHistoryAvailable = ToggleSupergroupIsAllHistoryAvailable -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
reportSupergroupSpam :: Member TDLib r => ReportSupergroupSpam -> Sem r (Error ∪ Ok)
reportSupergroupSpam :: ReportSupergroupSpam -> Sem r (Error ∪ Ok)
reportSupergroupSpam = ReportSupergroupSpam -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getSupergroupMembers :: Member TDLib r => GetSupergroupMembers -> Sem r (Error ∪ ChatMembers)
getSupergroupMembers :: GetSupergroupMembers -> Sem r (Error ∪ ChatMembers)
getSupergroupMembers = GetSupergroupMembers -> Sem r (Error ∪ ChatMembers)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteSupergroup :: Member TDLib r => DeleteSupergroup -> Sem r (Error ∪ Ok)
deleteSupergroup :: DeleteSupergroup -> Sem r (Error ∪ Ok)
deleteSupergroup = DeleteSupergroup -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
closeSecretChat :: Member TDLib r => CloseSecretChat -> Sem r (Error ∪ Ok)
closeSecretChat :: CloseSecretChat -> Sem r (Error ∪ Ok)
closeSecretChat = CloseSecretChat -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatEventLog :: Member TDLib r => GetChatEventLog -> Sem r (Error ∪ ChatEvents)
getChatEventLog :: GetChatEventLog -> Sem r (Error ∪ ChatEvents)
getChatEventLog = GetChatEventLog -> Sem r (Error ∪ ChatEvents)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getPaymentForm :: Member TDLib r => GetPaymentForm -> Sem r (Error ∪ PaymentForm)
getPaymentForm :: GetPaymentForm -> Sem r (Error ∪ PaymentForm)
getPaymentForm = GetPaymentForm -> Sem r (Error ∪ PaymentForm)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
validateOrderInfo :: Member TDLib r => ValidateOrderInfo -> Sem r (Error ∪ ValidatedOrderInfo)
validateOrderInfo :: ValidateOrderInfo -> Sem r (Error ∪ ValidatedOrderInfo)
validateOrderInfo = ValidateOrderInfo -> Sem r (Error ∪ ValidatedOrderInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendPaymentForm :: Member TDLib r => SendPaymentForm -> Sem r (Error ∪ PaymentResult)
sendPaymentForm :: SendPaymentForm -> Sem r (Error ∪ PaymentResult)
sendPaymentForm = SendPaymentForm -> Sem r (Error ∪ PaymentResult)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getPaymentReceipt :: Member TDLib r => GetPaymentReceipt -> Sem r (Error ∪ PaymentReceipt)
getPaymentReceipt :: GetPaymentReceipt -> Sem r (Error ∪ PaymentReceipt)
getPaymentReceipt = GetPaymentReceipt -> Sem r (Error ∪ PaymentReceipt)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getSavedOrderInfo :: Member TDLib r => GetSavedOrderInfo -> Sem r (Error ∪ OrderInfo)
getSavedOrderInfo :: GetSavedOrderInfo -> Sem r (Error ∪ OrderInfo)
getSavedOrderInfo = GetSavedOrderInfo -> Sem r (Error ∪ OrderInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteSavedOrderInfo :: Member TDLib r => DeleteSavedOrderInfo -> Sem r (Error ∪ Ok)
deleteSavedOrderInfo :: DeleteSavedOrderInfo -> Sem r (Error ∪ Ok)
deleteSavedOrderInfo = DeleteSavedOrderInfo -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteSavedCredentials :: Member TDLib r => DeleteSavedCredentials -> Sem r (Error ∪ Ok)
deleteSavedCredentials :: DeleteSavedCredentials -> Sem r (Error ∪ Ok)
deleteSavedCredentials = DeleteSavedCredentials -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getSupportUser :: Member TDLib r => GetSupportUser -> Sem r (Error ∪ User)
getSupportUser :: GetSupportUser -> Sem r (Error ∪ User)
getSupportUser = GetSupportUser -> Sem r (Error ∪ User)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getBackgrounds :: Member TDLib r => GetBackgrounds -> Sem r (Error ∪ Backgrounds)
getBackgrounds :: GetBackgrounds -> Sem r (Error ∪ Backgrounds)
getBackgrounds = GetBackgrounds -> Sem r (Error ∪ Backgrounds)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getBackgroundUrl :: Member TDLib r => GetBackgroundUrl -> Sem r (Error ∪ HttpUrl)
getBackgroundUrl :: GetBackgroundUrl -> Sem r (Error ∪ HttpUrl)
getBackgroundUrl = GetBackgroundUrl -> Sem r (Error ∪ HttpUrl)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
searchBackground :: Member TDLib r => SearchBackground -> Sem r (Error ∪ Background)
searchBackground :: SearchBackground -> Sem r (Error ∪ Background)
searchBackground = SearchBackground -> Sem r (Error ∪ Background)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setBackground :: Member TDLib r => SetBackground -> Sem r (Error ∪ Background)
setBackground :: SetBackground -> Sem r (Error ∪ Background)
setBackground = SetBackground -> Sem r (Error ∪ Background)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeBackground :: Member TDLib r => RemoveBackground -> Sem r (Error ∪ Ok)
removeBackground :: RemoveBackground -> Sem r (Error ∪ Ok)
removeBackground = RemoveBackground -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
resetBackgrounds :: Member TDLib r => ResetBackgrounds -> Sem r (Error ∪ Ok)
resetBackgrounds :: ResetBackgrounds -> Sem r (Error ∪ Ok)
resetBackgrounds = ResetBackgrounds -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getLocalizationTargetInfo :: Member TDLib r => GetLocalizationTargetInfo -> Sem r (Error ∪ LocalizationTargetInfo)
getLocalizationTargetInfo :: GetLocalizationTargetInfo -> Sem r (Error ∪ LocalizationTargetInfo)
getLocalizationTargetInfo = GetLocalizationTargetInfo -> Sem r (Error ∪ LocalizationTargetInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getLanguagePackInfo :: Member TDLib r => GetLanguagePackInfo -> Sem r (Error ∪ LanguagePackInfo)
getLanguagePackInfo :: GetLanguagePackInfo -> Sem r (Error ∪ LanguagePackInfo)
getLanguagePackInfo = GetLanguagePackInfo -> Sem r (Error ∪ LanguagePackInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getLanguagePackStrings :: Member TDLib r => GetLanguagePackStrings -> Sem r (Error ∪ LanguagePackStrings)
getLanguagePackStrings :: GetLanguagePackStrings -> Sem r (Error ∪ LanguagePackStrings)
getLanguagePackStrings = GetLanguagePackStrings -> Sem r (Error ∪ LanguagePackStrings)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
synchronizeLanguagePack :: Member TDLib r => SynchronizeLanguagePack -> Sem r (Error ∪ Ok)
synchronizeLanguagePack :: SynchronizeLanguagePack -> Sem r (Error ∪ Ok)
synchronizeLanguagePack = SynchronizeLanguagePack -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addCustomServerLanguagePack :: Member TDLib r => AddCustomServerLanguagePack -> Sem r (Error ∪ Ok)
addCustomServerLanguagePack :: AddCustomServerLanguagePack -> Sem r (Error ∪ Ok)
addCustomServerLanguagePack = AddCustomServerLanguagePack -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setCustomLanguagePack :: Member TDLib r => SetCustomLanguagePack -> Sem r (Error ∪ Ok)
setCustomLanguagePack :: SetCustomLanguagePack -> Sem r (Error ∪ Ok)
setCustomLanguagePack = SetCustomLanguagePack -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editCustomLanguagePackInfo :: Member TDLib r => EditCustomLanguagePackInfo -> Sem r (Error ∪ Ok)
editCustomLanguagePackInfo :: EditCustomLanguagePackInfo -> Sem r (Error ∪ Ok)
editCustomLanguagePackInfo = EditCustomLanguagePackInfo -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setCustomLanguagePackString :: Member TDLib r => SetCustomLanguagePackString -> Sem r (Error ∪ Ok)
setCustomLanguagePackString :: SetCustomLanguagePackString -> Sem r (Error ∪ Ok)
setCustomLanguagePackString = SetCustomLanguagePackString -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteLanguagePack :: Member TDLib r => DeleteLanguagePack -> Sem r (Error ∪ Ok)
deleteLanguagePack :: DeleteLanguagePack -> Sem r (Error ∪ Ok)
deleteLanguagePack = DeleteLanguagePack -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
registerDevice :: Member TDLib r => RegisterDevice -> Sem r (Error ∪ PushReceiverId)
registerDevice :: RegisterDevice -> Sem r (Error ∪ PushReceiverId)
registerDevice = RegisterDevice -> Sem r (Error ∪ PushReceiverId)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
processPushNotification :: Member TDLib r => ProcessPushNotification -> Sem r (Error ∪ Ok)
processPushNotification :: ProcessPushNotification -> Sem r (Error ∪ Ok)
processPushNotification = ProcessPushNotification -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getPushReceiverId :: Member TDLib r => GetPushReceiverId -> Sem r (Error ∪ PushReceiverId)
getPushReceiverId :: GetPushReceiverId -> Sem r (Error ∪ PushReceiverId)
getPushReceiverId = GetPushReceiverId -> Sem r (Error ∪ PushReceiverId)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getRecentlyVisitedTMeUrls :: Member TDLib r => GetRecentlyVisitedTMeUrls -> Sem r (Error ∪ TMeUrls)
getRecentlyVisitedTMeUrls :: GetRecentlyVisitedTMeUrls -> Sem r (Error ∪ TMeUrls)
getRecentlyVisitedTMeUrls = GetRecentlyVisitedTMeUrls -> Sem r (Error ∪ TMeUrls)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setUserPrivacySettingRules :: Member TDLib r => SetUserPrivacySettingRules -> Sem r (Error ∪ Ok)
setUserPrivacySettingRules :: SetUserPrivacySettingRules -> Sem r (Error ∪ Ok)
setUserPrivacySettingRules = SetUserPrivacySettingRules -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getUserPrivacySettingRules :: Member TDLib r => GetUserPrivacySettingRules -> Sem r (Error ∪ UserPrivacySettingRules)
getUserPrivacySettingRules :: GetUserPrivacySettingRules
-> Sem r (Error ∪ UserPrivacySettingRules)
getUserPrivacySettingRules = GetUserPrivacySettingRules
-> Sem r (Error ∪ UserPrivacySettingRules)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getOption :: Member TDLib r => GetOption -> Sem r (Error ∪ OptionValue)
getOption :: GetOption -> Sem r (Error ∪ OptionValue)
getOption = GetOption -> Sem r (Error ∪ OptionValue)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setOption :: Member TDLib r => SetOption -> Sem r (Error ∪ Ok)
setOption :: SetOption -> Sem r (Error ∪ Ok)
setOption = SetOption -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setAccountTtl :: Member TDLib r => SetAccountTtl -> Sem r (Error ∪ Ok)
setAccountTtl :: SetAccountTtl -> Sem r (Error ∪ Ok)
setAccountTtl = SetAccountTtl -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getAccountTtl :: Member TDLib r => GetAccountTtl -> Sem r (Error ∪ AccountTtl)
getAccountTtl :: GetAccountTtl -> Sem r (Error ∪ AccountTtl)
getAccountTtl = GetAccountTtl -> Sem r (Error ∪ AccountTtl)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deleteAccount :: Member TDLib r => DeleteAccount -> Sem r (Error ∪ Ok)
deleteAccount :: DeleteAccount -> Sem r (Error ∪ Ok)
deleteAccount = DeleteAccount -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeChatActionBar :: Member TDLib r => RemoveChatActionBar -> Sem r (Error ∪ Ok)
removeChatActionBar :: RemoveChatActionBar -> Sem r (Error ∪ Ok)
removeChatActionBar = RemoveChatActionBar -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
reportChat :: Member TDLib r => ReportChat -> Sem r (Error ∪ Ok)
reportChat :: ReportChat -> Sem r (Error ∪ Ok)
reportChat = ReportChat -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatStatisticsUrl :: Member TDLib r => GetChatStatisticsUrl -> Sem r (Error ∪ HttpUrl)
getChatStatisticsUrl :: GetChatStatisticsUrl -> Sem r (Error ∪ HttpUrl)
getChatStatisticsUrl = GetChatStatisticsUrl -> Sem r (Error ∪ HttpUrl)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatStatistics :: Member TDLib r => GetChatStatistics -> Sem r (Error ∪ ChatStatistics)
getChatStatistics :: GetChatStatistics -> Sem r (Error ∪ ChatStatistics)
getChatStatistics = GetChatStatistics -> Sem r (Error ∪ ChatStatistics)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getChatStatisticsGraph :: Member TDLib r => GetChatStatisticsGraph -> Sem r (Error ∪ StatisticsGraph)
getChatStatisticsGraph :: GetChatStatisticsGraph -> Sem r (Error ∪ StatisticsGraph)
getChatStatisticsGraph = GetChatStatisticsGraph -> Sem r (Error ∪ StatisticsGraph)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getStorageStatistics :: Member TDLib r => GetStorageStatistics -> Sem r (Error ∪ StorageStatistics)
getStorageStatistics :: GetStorageStatistics -> Sem r (Error ∪ StorageStatistics)
getStorageStatistics = GetStorageStatistics -> Sem r (Error ∪ StorageStatistics)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getStorageStatisticsFast :: Member TDLib r => GetStorageStatisticsFast -> Sem r (Error ∪ StorageStatisticsFast)
getStorageStatisticsFast :: GetStorageStatisticsFast -> Sem r (Error ∪ StorageStatisticsFast)
getStorageStatisticsFast = GetStorageStatisticsFast -> Sem r (Error ∪ StorageStatisticsFast)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getDatabaseStatistics :: Member TDLib r => GetDatabaseStatistics -> Sem r (Error ∪ DatabaseStatistics)
getDatabaseStatistics :: GetDatabaseStatistics -> Sem r (Error ∪ DatabaseStatistics)
getDatabaseStatistics = GetDatabaseStatistics -> Sem r (Error ∪ DatabaseStatistics)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
optimizeStorage :: Member TDLib r => OptimizeStorage -> Sem r (Error ∪ StorageStatistics)
optimizeStorage :: OptimizeStorage -> Sem r (Error ∪ StorageStatistics)
optimizeStorage = OptimizeStorage -> Sem r (Error ∪ StorageStatistics)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setNetworkType :: Member TDLib r => SetNetworkType -> Sem r (Error ∪ Ok)
setNetworkType :: SetNetworkType -> Sem r (Error ∪ Ok)
setNetworkType = SetNetworkType -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getNetworkStatistics :: Member TDLib r => GetNetworkStatistics -> Sem r (Error ∪ NetworkStatistics)
getNetworkStatistics :: GetNetworkStatistics -> Sem r (Error ∪ NetworkStatistics)
getNetworkStatistics = GetNetworkStatistics -> Sem r (Error ∪ NetworkStatistics)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addNetworkStatistics :: Member TDLib r => AddNetworkStatistics -> Sem r (Error ∪ Ok)
addNetworkStatistics :: AddNetworkStatistics -> Sem r (Error ∪ Ok)
addNetworkStatistics = AddNetworkStatistics -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
resetNetworkStatistics :: Member TDLib r => ResetNetworkStatistics -> Sem r (Error ∪ Ok)
resetNetworkStatistics :: ResetNetworkStatistics -> Sem r (Error ∪ Ok)
resetNetworkStatistics = ResetNetworkStatistics -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getAutoDownloadSettingsPresets :: Member TDLib r => GetAutoDownloadSettingsPresets -> Sem r (Error ∪ AutoDownloadSettingsPresets)
getAutoDownloadSettingsPresets :: GetAutoDownloadSettingsPresets
-> Sem r (Error ∪ AutoDownloadSettingsPresets)
getAutoDownloadSettingsPresets = GetAutoDownloadSettingsPresets
-> Sem r (Error ∪ AutoDownloadSettingsPresets)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setAutoDownloadSettings :: Member TDLib r => SetAutoDownloadSettings -> Sem r (Error ∪ Ok)
setAutoDownloadSettings :: SetAutoDownloadSettings -> Sem r (Error ∪ Ok)
setAutoDownloadSettings = SetAutoDownloadSettings -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getBankCardInfo :: Member TDLib r => GetBankCardInfo -> Sem r (Error ∪ BankCardInfo)
getBankCardInfo :: GetBankCardInfo -> Sem r (Error ∪ BankCardInfo)
getBankCardInfo = GetBankCardInfo -> Sem r (Error ∪ BankCardInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getPassportElement :: Member TDLib r => GetPassportElement -> Sem r (Error ∪ PassportElement)
getPassportElement :: GetPassportElement -> Sem r (Error ∪ PassportElement)
getPassportElement = GetPassportElement -> Sem r (Error ∪ PassportElement)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getAllPassportElements :: Member TDLib r => GetAllPassportElements -> Sem r (Error ∪ PassportElements)
getAllPassportElements :: GetAllPassportElements -> Sem r (Error ∪ PassportElements)
getAllPassportElements = GetAllPassportElements -> Sem r (Error ∪ PassportElements)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setPassportElement :: Member TDLib r => SetPassportElement -> Sem r (Error ∪ PassportElement)
setPassportElement :: SetPassportElement -> Sem r (Error ∪ PassportElement)
setPassportElement = SetPassportElement -> Sem r (Error ∪ PassportElement)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
deletePassportElement :: Member TDLib r => DeletePassportElement -> Sem r (Error ∪ Ok)
deletePassportElement :: DeletePassportElement -> Sem r (Error ∪ Ok)
deletePassportElement = DeletePassportElement -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setPassportElementErrors :: Member TDLib r => SetPassportElementErrors -> Sem r (Error ∪ Ok)
setPassportElementErrors :: SetPassportElementErrors -> Sem r (Error ∪ Ok)
setPassportElementErrors = SetPassportElementErrors -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getPreferredCountryLanguage :: Member TDLib r => GetPreferredCountryLanguage -> Sem r (Error ∪ Text)
getPreferredCountryLanguage :: GetPreferredCountryLanguage -> Sem r (Error ∪ Text)
getPreferredCountryLanguage = GetPreferredCountryLanguage -> Sem r (Error ∪ Text)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendPhoneNumberVerificationCode :: Member TDLib r => SendPhoneNumberVerificationCode -> Sem r (Error ∪ AuthenticationCodeInfo)
sendPhoneNumberVerificationCode :: SendPhoneNumberVerificationCode
-> Sem r (Error ∪ AuthenticationCodeInfo)
sendPhoneNumberVerificationCode = SendPhoneNumberVerificationCode
-> Sem r (Error ∪ AuthenticationCodeInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
resendPhoneNumberVerificationCode :: Member TDLib r => ResendPhoneNumberVerificationCode -> Sem r (Error ∪ AuthenticationCodeInfo)
resendPhoneNumberVerificationCode :: ResendPhoneNumberVerificationCode
-> Sem r (Error ∪ AuthenticationCodeInfo)
resendPhoneNumberVerificationCode = ResendPhoneNumberVerificationCode
-> Sem r (Error ∪ AuthenticationCodeInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkPhoneNumberVerificationCode :: Member TDLib r => CheckPhoneNumberVerificationCode -> Sem r (Error ∪ Ok)
checkPhoneNumberVerificationCode :: CheckPhoneNumberVerificationCode -> Sem r (Error ∪ Ok)
checkPhoneNumberVerificationCode = CheckPhoneNumberVerificationCode -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendEmailAddressVerificationCode :: Member TDLib r => SendEmailAddressVerificationCode -> Sem r (Error ∪ EmailAddressAuthenticationCodeInfo)
sendEmailAddressVerificationCode :: SendEmailAddressVerificationCode
-> Sem r (Error ∪ EmailAddressAuthenticationCodeInfo)
sendEmailAddressVerificationCode = SendEmailAddressVerificationCode
-> Sem r (Error ∪ EmailAddressAuthenticationCodeInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
resendEmailAddressVerificationCode :: Member TDLib r => ResendEmailAddressVerificationCode -> Sem r (Error ∪ EmailAddressAuthenticationCodeInfo)
resendEmailAddressVerificationCode :: ResendEmailAddressVerificationCode
-> Sem r (Error ∪ EmailAddressAuthenticationCodeInfo)
resendEmailAddressVerificationCode = ResendEmailAddressVerificationCode
-> Sem r (Error ∪ EmailAddressAuthenticationCodeInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkEmailAddressVerificationCode :: Member TDLib r => CheckEmailAddressVerificationCode -> Sem r (Error ∪ Ok)
checkEmailAddressVerificationCode :: CheckEmailAddressVerificationCode -> Sem r (Error ∪ Ok)
checkEmailAddressVerificationCode = CheckEmailAddressVerificationCode -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getPassportAuthorizationForm :: Member TDLib r => GetPassportAuthorizationForm -> Sem r (Error ∪ PassportAuthorizationForm)
getPassportAuthorizationForm :: GetPassportAuthorizationForm
-> Sem r (Error ∪ PassportAuthorizationForm)
getPassportAuthorizationForm = GetPassportAuthorizationForm
-> Sem r (Error ∪ PassportAuthorizationForm)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getPassportAuthorizationFormAvailableElements :: Member TDLib r => GetPassportAuthorizationFormAvailableElements -> Sem r (Error ∪ PassportElementsWithErrors)
getPassportAuthorizationFormAvailableElements :: GetPassportAuthorizationFormAvailableElements
-> Sem r (Error ∪ PassportElementsWithErrors)
getPassportAuthorizationFormAvailableElements = GetPassportAuthorizationFormAvailableElements
-> Sem r (Error ∪ PassportElementsWithErrors)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendPassportAuthorizationForm :: Member TDLib r => SendPassportAuthorizationForm -> Sem r (Error ∪ Ok)
sendPassportAuthorizationForm :: SendPassportAuthorizationForm -> Sem r (Error ∪ Ok)
sendPassportAuthorizationForm = SendPassportAuthorizationForm -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendPhoneNumberConfirmationCode :: Member TDLib r => SendPhoneNumberConfirmationCode -> Sem r (Error ∪ AuthenticationCodeInfo)
sendPhoneNumberConfirmationCode :: SendPhoneNumberConfirmationCode
-> Sem r (Error ∪ AuthenticationCodeInfo)
sendPhoneNumberConfirmationCode = SendPhoneNumberConfirmationCode
-> Sem r (Error ∪ AuthenticationCodeInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
resendPhoneNumberConfirmationCode :: Member TDLib r => ResendPhoneNumberConfirmationCode -> Sem r (Error ∪ AuthenticationCodeInfo)
resendPhoneNumberConfirmationCode :: ResendPhoneNumberConfirmationCode
-> Sem r (Error ∪ AuthenticationCodeInfo)
resendPhoneNumberConfirmationCode = ResendPhoneNumberConfirmationCode
-> Sem r (Error ∪ AuthenticationCodeInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
checkPhoneNumberConfirmationCode :: Member TDLib r => CheckPhoneNumberConfirmationCode -> Sem r (Error ∪ Ok)
checkPhoneNumberConfirmationCode :: CheckPhoneNumberConfirmationCode -> Sem r (Error ∪ Ok)
checkPhoneNumberConfirmationCode = CheckPhoneNumberConfirmationCode -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setBotUpdatesStatus :: Member TDLib r => SetBotUpdatesStatus -> Sem r (Error ∪ Ok)
setBotUpdatesStatus :: SetBotUpdatesStatus -> Sem r (Error ∪ Ok)
setBotUpdatesStatus = SetBotUpdatesStatus -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
uploadStickerFile :: Member TDLib r => UploadStickerFile -> Sem r (Error ∪ File)
uploadStickerFile :: UploadStickerFile -> Sem r (Error ∪ File)
uploadStickerFile = UploadStickerFile -> Sem r (Error ∪ File)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
createNewStickerSet :: Member TDLib r => CreateNewStickerSet -> Sem r (Error ∪ StickerSet)
createNewStickerSet :: CreateNewStickerSet -> Sem r (Error ∪ StickerSet)
createNewStickerSet = CreateNewStickerSet -> Sem r (Error ∪ StickerSet)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addStickerToSet :: Member TDLib r => AddStickerToSet -> Sem r (Error ∪ StickerSet)
addStickerToSet :: AddStickerToSet -> Sem r (Error ∪ StickerSet)
addStickerToSet = AddStickerToSet -> Sem r (Error ∪ StickerSet)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setStickerSetThumbnail :: Member TDLib r => SetStickerSetThumbnail -> Sem r (Error ∪ StickerSet)
setStickerSetThumbnail :: SetStickerSetThumbnail -> Sem r (Error ∪ StickerSet)
setStickerSetThumbnail = SetStickerSetThumbnail -> Sem r (Error ∪ StickerSet)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setStickerPositionInSet :: Member TDLib r => SetStickerPositionInSet -> Sem r (Error ∪ Ok)
setStickerPositionInSet :: SetStickerPositionInSet -> Sem r (Error ∪ Ok)
setStickerPositionInSet = SetStickerPositionInSet -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeStickerFromSet :: Member TDLib r => RemoveStickerFromSet -> Sem r (Error ∪ Ok)
removeStickerFromSet :: RemoveStickerFromSet -> Sem r (Error ∪ Ok)
removeStickerFromSet = RemoveStickerFromSet -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getMapThumbnailFile :: Member TDLib r => GetMapThumbnailFile -> Sem r (Error ∪ File)
getMapThumbnailFile :: GetMapThumbnailFile -> Sem r (Error ∪ File)
getMapThumbnailFile = GetMapThumbnailFile -> Sem r (Error ∪ File)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
acceptTermsOfService :: Member TDLib r => AcceptTermsOfService -> Sem r (Error ∪ Ok)
acceptTermsOfService :: AcceptTermsOfService -> Sem r (Error ∪ Ok)
acceptTermsOfService = AcceptTermsOfService -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
sendCustomRequest :: Member TDLib r => SendCustomRequest -> Sem r (Error ∪ CustomRequestResult)
sendCustomRequest :: SendCustomRequest -> Sem r (Error ∪ CustomRequestResult)
sendCustomRequest = SendCustomRequest -> Sem r (Error ∪ CustomRequestResult)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
answerCustomQuery :: Member TDLib r => AnswerCustomQuery -> Sem r (Error ∪ Ok)
answerCustomQuery :: AnswerCustomQuery -> Sem r (Error ∪ Ok)
answerCustomQuery = AnswerCustomQuery -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setAlarm :: Member TDLib r => SetAlarm -> Sem r (Error ∪ Ok)
setAlarm :: SetAlarm -> Sem r (Error ∪ Ok)
setAlarm = SetAlarm -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getCountryCode :: Member TDLib r => GetCountryCode -> Sem r (Error ∪ Text)
getCountryCode :: GetCountryCode -> Sem r (Error ∪ Text)
getCountryCode = GetCountryCode -> Sem r (Error ∪ Text)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getInviteText :: Member TDLib r => GetInviteText -> Sem r (Error ∪ Text)
getInviteText :: GetInviteText -> Sem r (Error ∪ Text)
getInviteText = GetInviteText -> Sem r (Error ∪ Text)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getDeepLinkInfo :: Member TDLib r => GetDeepLinkInfo -> Sem r (Error ∪ DeepLinkInfo)
getDeepLinkInfo :: GetDeepLinkInfo -> Sem r (Error ∪ DeepLinkInfo)
getDeepLinkInfo = GetDeepLinkInfo -> Sem r (Error ∪ DeepLinkInfo)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getApplicationConfig :: Member TDLib r => GetApplicationConfig -> Sem r (Error ∪ JsonValue)
getApplicationConfig :: GetApplicationConfig -> Sem r (Error ∪ JsonValue)
getApplicationConfig = GetApplicationConfig -> Sem r (Error ∪ JsonValue)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
saveApplicationLogEvent :: Member TDLib r => SaveApplicationLogEvent -> Sem r (Error ∪ Ok)
saveApplicationLogEvent :: SaveApplicationLogEvent -> Sem r (Error ∪ Ok)
saveApplicationLogEvent = SaveApplicationLogEvent -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addProxy :: Member TDLib r => AddProxy -> Sem r (Error ∪ Proxy)
addProxy :: AddProxy -> Sem r (Error ∪ Proxy)
addProxy = AddProxy -> Sem r (Error ∪ Proxy)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
editProxy :: Member TDLib r => EditProxy -> Sem r (Error ∪ Proxy)
editProxy :: EditProxy -> Sem r (Error ∪ Proxy)
editProxy = EditProxy -> Sem r (Error ∪ Proxy)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
enableProxy :: Member TDLib r => EnableProxy -> Sem r (Error ∪ Ok)
enableProxy :: EnableProxy -> Sem r (Error ∪ Ok)
enableProxy = EnableProxy -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
disableProxy :: Member TDLib r => DisableProxy -> Sem r (Error ∪ Ok)
disableProxy :: DisableProxy -> Sem r (Error ∪ Ok)
disableProxy = DisableProxy -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
removeProxy :: Member TDLib r => RemoveProxy -> Sem r (Error ∪ Ok)
removeProxy :: RemoveProxy -> Sem r (Error ∪ Ok)
removeProxy = RemoveProxy -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getProxies :: Member TDLib r => GetProxies -> Sem r (Error ∪ Proxies)
getProxies :: GetProxies -> Sem r (Error ∪ Proxies)
getProxies = GetProxies -> Sem r (Error ∪ Proxies)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getProxyLink :: Member TDLib r => GetProxyLink -> Sem r (Error ∪ Text)
getProxyLink :: GetProxyLink -> Sem r (Error ∪ Text)
getProxyLink = GetProxyLink -> Sem r (Error ∪ Text)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
pingProxy :: Member TDLib r => PingProxy -> Sem r (Error ∪ Seconds)
pingProxy :: PingProxy -> Sem r (Error ∪ Seconds)
pingProxy = PingProxy -> Sem r (Error ∪ Seconds)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setLogStream :: Member TDLib r => SetLogStream -> Sem r (Error ∪ Ok)
setLogStream :: SetLogStream -> Sem r (Error ∪ Ok)
setLogStream = SetLogStream -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getLogStream :: Member TDLib r => GetLogStream -> Sem r (Error ∪ LogStream)
getLogStream :: GetLogStream -> Sem r (Error ∪ LogStream)
getLogStream = GetLogStream -> Sem r (Error ∪ LogStream)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setLogVerbosityLevel :: Member TDLib r => SetLogVerbosityLevel -> Sem r (Error ∪ Ok)
setLogVerbosityLevel :: SetLogVerbosityLevel -> Sem r (Error ∪ Ok)
setLogVerbosityLevel = SetLogVerbosityLevel -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getLogVerbosityLevel :: Member TDLib r => GetLogVerbosityLevel -> Sem r (Error ∪ LogVerbosityLevel)
getLogVerbosityLevel :: GetLogVerbosityLevel -> Sem r (Error ∪ LogVerbosityLevel)
getLogVerbosityLevel = GetLogVerbosityLevel -> Sem r (Error ∪ LogVerbosityLevel)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getLogTags :: Member TDLib r => GetLogTags -> Sem r (Error ∪ LogTags)
getLogTags :: GetLogTags -> Sem r (Error ∪ LogTags)
getLogTags = GetLogTags -> Sem r (Error ∪ LogTags)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
setLogTagVerbosityLevel :: Member TDLib r => SetLogTagVerbosityLevel -> Sem r (Error ∪ Ok)
setLogTagVerbosityLevel :: SetLogTagVerbosityLevel -> Sem r (Error ∪ Ok)
setLogTagVerbosityLevel = SetLogTagVerbosityLevel -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
getLogTagVerbosityLevel :: Member TDLib r => GetLogTagVerbosityLevel -> Sem r (Error ∪ LogVerbosityLevel)
getLogTagVerbosityLevel :: GetLogTagVerbosityLevel -> Sem r (Error ∪ LogVerbosityLevel)
getLogTagVerbosityLevel = GetLogTagVerbosityLevel -> Sem r (Error ∪ LogVerbosityLevel)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
addLogMessage :: Member TDLib r => AddLogMessage -> Sem r (Error ∪ Ok)
addLogMessage :: AddLogMessage -> Sem r (Error ∪ Ok)
addLogMessage = AddLogMessage -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testCallEmpty :: Member TDLib r => TestCallEmpty -> Sem r (Error ∪ Ok)
testCallEmpty :: TestCallEmpty -> Sem r (Error ∪ Ok)
testCallEmpty = TestCallEmpty -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testCallString :: Member TDLib r => TestCallString -> Sem r (Error ∪ TestString)
testCallString :: TestCallString -> Sem r (Error ∪ TestString)
testCallString = TestCallString -> Sem r (Error ∪ TestString)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testCallBytes :: Member TDLib r => TestCallBytes -> Sem r (Error ∪ TestBytes)
testCallBytes :: TestCallBytes -> Sem r (Error ∪ TestBytes)
testCallBytes = TestCallBytes -> Sem r (Error ∪ TestBytes)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testCallVectorInt :: Member TDLib r => TestCallVectorInt -> Sem r (Error ∪ TestVectorInt)
testCallVectorInt :: TestCallVectorInt -> Sem r (Error ∪ TestVectorInt)
testCallVectorInt = TestCallVectorInt -> Sem r (Error ∪ TestVectorInt)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testCallVectorIntObject :: Member TDLib r => TestCallVectorIntObject -> Sem r (Error ∪ TestVectorIntObject)
testCallVectorIntObject :: TestCallVectorIntObject -> Sem r (Error ∪ TestVectorIntObject)
testCallVectorIntObject = TestCallVectorIntObject -> Sem r (Error ∪ TestVectorIntObject)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testCallVectorString :: Member TDLib r => TestCallVectorString -> Sem r (Error ∪ TestVectorString)
testCallVectorString :: TestCallVectorString -> Sem r (Error ∪ TestVectorString)
testCallVectorString = TestCallVectorString -> Sem r (Error ∪ TestVectorString)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testCallVectorStringObject :: Member TDLib r => TestCallVectorStringObject -> Sem r (Error ∪ TestVectorStringObject)
testCallVectorStringObject :: TestCallVectorStringObject
-> Sem r (Error ∪ TestVectorStringObject)
testCallVectorStringObject = TestCallVectorStringObject
-> Sem r (Error ∪ TestVectorStringObject)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testSquareInt :: Member TDLib r => TestSquareInt -> Sem r (Error ∪ TestInt)
testSquareInt :: TestSquareInt -> Sem r (Error ∪ TestInt)
testSquareInt = TestSquareInt -> Sem r (Error ∪ TestInt)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testNetwork :: Member TDLib r => TestNetwork -> Sem r (Error ∪ Ok)
testNetwork :: TestNetwork -> Sem r (Error ∪ Ok)
testNetwork = TestNetwork -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testProxy :: Member TDLib r => TestProxy -> Sem r (Error ∪ Ok)
testProxy :: TestProxy -> Sem r (Error ∪ Ok)
testProxy = TestProxy -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testGetDifference :: Member TDLib r => TestGetDifference -> Sem r (Error ∪ Ok)
testGetDifference :: TestGetDifference -> Sem r (Error ∪ Ok)
testGetDifference = TestGetDifference -> Sem r (Error ∪ Ok)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testUseUpdate :: Member TDLib r => TestUseUpdate -> Sem r (Error ∪ Update)
testUseUpdate :: TestUseUpdate -> Sem r (Error ∪ Update)
testUseUpdate = TestUseUpdate -> Sem r (Error ∪ Update)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd
testReturnError :: Member TDLib r => TestReturnError -> Sem r (Error ∪ Error)
testReturnError :: TestReturnError -> Sem r (Error ∪ Error)
testReturnError = TestReturnError -> Sem r (Error ∪ Error)
forall cmd res err (r :: [(* -> *) -> * -> *]).
(ToJSON cmd, FromJSON res, FromJSON err, Member TDLib r) =>
cmd -> Sem r (err ∪ res)
runCmd