Values.RevokeSnapshotAccessResultSourceRemoves the ability of the specified Amazon Web Services account to restore the specified snapshot. If the account is currently restoring the snapshot, the restore will run to completion. For more information about working with snapshots, go to Amazon Redshift Snapshots in the Amazon Redshift Cluster Management Guide.
and t = {revokeSnapshotAccessResult : revokeSnapshotAccessResult;responseMetaData : responseMetaData;}type error = [ | `AccessToSnapshotDeniedFault of AccessToSnapshotDeniedFault.t| `AuthorizationNotFoundFault of AuthorizationNotFoundFault.t| `ClusterSnapshotNotFoundFault of ClusterSnapshotNotFoundFault.t| `UnsupportedOperationFault of UnsupportedOperationFault.t| `Unknown_operation_error of string * string option ]val error_of_json :
string ->
Yojson.Safe.t ->
[> `AccessToSnapshotDeniedFault of unit
| `AuthorizationNotFoundFault of unit
| `ClusterSnapshotNotFoundFault of unit
| `Unknown_operation_error of string * string option
| `UnsupportedOperationFault of unit ]val error_of_xml :
string ->
Awso.Xml.t ->
[> `AccessToSnapshotDeniedFault of unit
| `AuthorizationNotFoundFault of unit
| `ClusterSnapshotNotFoundFault of unit
| `Unknown_operation_error of string * string option
| `UnsupportedOperationFault of unit ]val to_value :
t ->
[> `Structure of
(string
* [> `Structure of
(string
* [> `Structure of
(string
* [> `Boolean of Boolean.t
| `Double of Double.t
| `Integer of Integer.t
| `List of
[> `String of String_.t
| `Structure of
(string * [> `String of String_.t ]) list ]
list
| `Long of Long.t
| `String of String_.t
| `Timestamp of TStamp.t ])
list ])
list ])
list ]