Module VpcLattice.Listener

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-vpclattice-listener.html

type fixed_response = {
  1. status_code : int;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-vpclattice-listener-fixedresponse.html

and tag = {
  1. value : string;
  2. key : string;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html

and weighted_target_group = {
  1. weight : int option;
  2. target_group_identifier : string;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-vpclattice-listener-weightedtargetgroup.html

and forward = {
  1. target_groups : weighted_target_group list;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-vpclattice-listener-forward.html

and default_action = {
  1. forward : forward option;
  2. fixed_response : fixed_response option;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-vpclattice-listener-defaultaction.html

type properties = {
  1. default_action : default_action;
  2. port : int option;
  3. service_identifier : string option;
  4. protocol : string;
  5. tags : tag list option;
  6. name : string option;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-vpclattice-listener.html;

val make_properties : default_action:default_action -> ?port:int -> ?service_identifier:string -> protocol:string -> ?tags:tag list -> ?name:string -> unit -> properties
val make_fixed_response : status_code:int -> unit -> fixed_response
val make_tag : value:string -> key:string -> unit -> tag
val make_weighted_target_group : ?weight:int -> target_group_identifier:string -> unit -> weighted_target_group
val make_forward : target_groups:weighted_target_group list -> unit -> forward
val make_default_action : ?forward:forward -> ?fixed_response:fixed_response -> unit -> default_action
val yojson_of_fixed_response : fixed_response -> Yojson.Safe.t
val yojson_of_tag : tag -> [> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_weighted_target_group : weighted_target_group -> Yojson.Safe.t
val yojson_of_forward : forward -> Yojson.Safe.t
val yojson_of_default_action : default_action -> [> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_properties : properties -> [> `Assoc of (string * Yojson.Safe.t) list ]
type attributes = {
  1. ref_ : string;
  2. id : string;
  3. service_arn : string;
  4. arn : string;
  5. service_id : string;
}
val create_attributes : string -> attributes
val cloudformation_type : string