{- This file was auto-generated from tensorflow/core/protobuf/queue_runner.proto by the proto-lens-protoc program. -}
{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-}
{-# OPTIONS_GHC -Wno-unused-imports#-}
{-# OPTIONS_GHC -Wno-duplicate-exports#-}
{-# OPTIONS_GHC -Wno-dodgy-exports#-}
module Proto.Tensorflow.Core.Protobuf.QueueRunner (
        QueueRunnerDef()
    ) where
import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism
import qualified Data.ProtoLens.Runtime.Prelude as Prelude
import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int
import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid
import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word
import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types
import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2
import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked
import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text
import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map
import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString
import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8
import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding
import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector
import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic
import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed
import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read
import qualified Proto.Tensorflow.Core.Protobuf.ErrorCodes
{- | Fields :
     
         * 'Proto.Tensorflow.Core.Protobuf.QueueRunner_Fields.queueName' @:: Lens' QueueRunnerDef Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.QueueRunner_Fields.enqueueOpName' @:: Lens' QueueRunnerDef [Data.Text.Text]@
         * 'Proto.Tensorflow.Core.Protobuf.QueueRunner_Fields.vec'enqueueOpName' @:: Lens' QueueRunnerDef (Data.Vector.Vector Data.Text.Text)@
         * 'Proto.Tensorflow.Core.Protobuf.QueueRunner_Fields.closeOpName' @:: Lens' QueueRunnerDef Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.QueueRunner_Fields.cancelOpName' @:: Lens' QueueRunnerDef Data.Text.Text@
         * 'Proto.Tensorflow.Core.Protobuf.QueueRunner_Fields.queueClosedExceptionTypes' @:: Lens' QueueRunnerDef [Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code]@
         * 'Proto.Tensorflow.Core.Protobuf.QueueRunner_Fields.vec'queueClosedExceptionTypes' @:: Lens' QueueRunnerDef (Data.Vector.Vector Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code)@ -}
data QueueRunnerDef
  = QueueRunnerDef'_constructor {QueueRunnerDef -> Text
_QueueRunnerDef'queueName :: !Data.Text.Text,
                                 QueueRunnerDef -> Vector Text
_QueueRunnerDef'enqueueOpName :: !(Data.Vector.Vector Data.Text.Text),
                                 QueueRunnerDef -> Text
_QueueRunnerDef'closeOpName :: !Data.Text.Text,
                                 QueueRunnerDef -> Text
_QueueRunnerDef'cancelOpName :: !Data.Text.Text,
                                 QueueRunnerDef -> Vector Code
_QueueRunnerDef'queueClosedExceptionTypes :: !(Data.Vector.Vector Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code),
                                 QueueRunnerDef -> FieldSet
_QueueRunnerDef'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (QueueRunnerDef -> QueueRunnerDef -> Bool
(QueueRunnerDef -> QueueRunnerDef -> Bool)
-> (QueueRunnerDef -> QueueRunnerDef -> Bool) -> Eq QueueRunnerDef
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: QueueRunnerDef -> QueueRunnerDef -> Bool
$c/= :: QueueRunnerDef -> QueueRunnerDef -> Bool
== :: QueueRunnerDef -> QueueRunnerDef -> Bool
$c== :: QueueRunnerDef -> QueueRunnerDef -> Bool
Prelude.Eq, Eq QueueRunnerDef
Eq QueueRunnerDef =>
(QueueRunnerDef -> QueueRunnerDef -> Ordering)
-> (QueueRunnerDef -> QueueRunnerDef -> Bool)
-> (QueueRunnerDef -> QueueRunnerDef -> Bool)
-> (QueueRunnerDef -> QueueRunnerDef -> Bool)
-> (QueueRunnerDef -> QueueRunnerDef -> Bool)
-> (QueueRunnerDef -> QueueRunnerDef -> QueueRunnerDef)
-> (QueueRunnerDef -> QueueRunnerDef -> QueueRunnerDef)
-> Ord QueueRunnerDef
QueueRunnerDef -> QueueRunnerDef -> Bool
QueueRunnerDef -> QueueRunnerDef -> Ordering
QueueRunnerDef -> QueueRunnerDef -> QueueRunnerDef
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: QueueRunnerDef -> QueueRunnerDef -> QueueRunnerDef
$cmin :: QueueRunnerDef -> QueueRunnerDef -> QueueRunnerDef
max :: QueueRunnerDef -> QueueRunnerDef -> QueueRunnerDef
$cmax :: QueueRunnerDef -> QueueRunnerDef -> QueueRunnerDef
>= :: QueueRunnerDef -> QueueRunnerDef -> Bool
$c>= :: QueueRunnerDef -> QueueRunnerDef -> Bool
> :: QueueRunnerDef -> QueueRunnerDef -> Bool
$c> :: QueueRunnerDef -> QueueRunnerDef -> Bool
<= :: QueueRunnerDef -> QueueRunnerDef -> Bool
$c<= :: QueueRunnerDef -> QueueRunnerDef -> Bool
< :: QueueRunnerDef -> QueueRunnerDef -> Bool
$c< :: QueueRunnerDef -> QueueRunnerDef -> Bool
compare :: QueueRunnerDef -> QueueRunnerDef -> Ordering
$ccompare :: QueueRunnerDef -> QueueRunnerDef -> Ordering
$cp1Ord :: Eq QueueRunnerDef
Prelude.Ord)
instance Prelude.Show QueueRunnerDef where
  showsPrec :: Int -> QueueRunnerDef -> ShowS
showsPrec _ __x :: QueueRunnerDef
__x __s :: String
__s
    = Char -> ShowS
Prelude.showChar
        '{'
        (String -> ShowS
Prelude.showString
           (QueueRunnerDef -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort QueueRunnerDef
__x) (Char -> ShowS
Prelude.showChar '}' String
__s))
instance Data.ProtoLens.Field.HasField QueueRunnerDef "queueName" Data.Text.Text where
  fieldOf :: Proxy# "queueName"
-> (Text -> f Text) -> QueueRunnerDef -> f QueueRunnerDef
fieldOf _
    = ((Text -> f Text) -> QueueRunnerDef -> f QueueRunnerDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> QueueRunnerDef
-> f QueueRunnerDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueueRunnerDef -> Text)
-> (QueueRunnerDef -> Text -> QueueRunnerDef)
-> Lens QueueRunnerDef QueueRunnerDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueueRunnerDef -> Text
_QueueRunnerDef'queueName
           (\ x__ :: QueueRunnerDef
x__ y__ :: Text
y__ -> QueueRunnerDef
x__ {_QueueRunnerDef'queueName :: Text
_QueueRunnerDef'queueName = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueueRunnerDef "enqueueOpName" [Data.Text.Text] where
  fieldOf :: Proxy# "enqueueOpName"
-> ([Text] -> f [Text]) -> QueueRunnerDef -> f QueueRunnerDef
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> QueueRunnerDef -> f QueueRunnerDef)
-> (([Text] -> f [Text]) -> Vector Text -> f (Vector Text))
-> ([Text] -> f [Text])
-> QueueRunnerDef
-> f QueueRunnerDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueueRunnerDef -> Vector Text)
-> (QueueRunnerDef -> Vector Text -> QueueRunnerDef)
-> Lens QueueRunnerDef QueueRunnerDef (Vector Text) (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueueRunnerDef -> Vector Text
_QueueRunnerDef'enqueueOpName
           (\ x__ :: QueueRunnerDef
x__ y__ :: Vector Text
y__ -> QueueRunnerDef
x__ {_QueueRunnerDef'enqueueOpName :: Vector Text
_QueueRunnerDef'enqueueOpName = Vector Text
y__}))
        ((Vector Text -> [Text])
-> (Vector Text -> [Text] -> Vector Text)
-> Lens (Vector Text) (Vector Text) [Text] [Text]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Text -> [Text]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Text]
y__ -> [Text] -> Vector Text
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Text]
y__))
instance Data.ProtoLens.Field.HasField QueueRunnerDef "vec'enqueueOpName" (Data.Vector.Vector Data.Text.Text) where
  fieldOf :: Proxy# "vec'enqueueOpName"
-> (Vector Text -> f (Vector Text))
-> QueueRunnerDef
-> f QueueRunnerDef
fieldOf _
    = ((Vector Text -> f (Vector Text))
 -> QueueRunnerDef -> f QueueRunnerDef)
-> ((Vector Text -> f (Vector Text))
    -> Vector Text -> f (Vector Text))
-> (Vector Text -> f (Vector Text))
-> QueueRunnerDef
-> f QueueRunnerDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueueRunnerDef -> Vector Text)
-> (QueueRunnerDef -> Vector Text -> QueueRunnerDef)
-> Lens QueueRunnerDef QueueRunnerDef (Vector Text) (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueueRunnerDef -> Vector Text
_QueueRunnerDef'enqueueOpName
           (\ x__ :: QueueRunnerDef
x__ y__ :: Vector Text
y__ -> QueueRunnerDef
x__ {_QueueRunnerDef'enqueueOpName :: Vector Text
_QueueRunnerDef'enqueueOpName = Vector Text
y__}))
        (Vector Text -> f (Vector Text)) -> Vector Text -> f (Vector Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueueRunnerDef "closeOpName" Data.Text.Text where
  fieldOf :: Proxy# "closeOpName"
-> (Text -> f Text) -> QueueRunnerDef -> f QueueRunnerDef
fieldOf _
    = ((Text -> f Text) -> QueueRunnerDef -> f QueueRunnerDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> QueueRunnerDef
-> f QueueRunnerDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueueRunnerDef -> Text)
-> (QueueRunnerDef -> Text -> QueueRunnerDef)
-> Lens QueueRunnerDef QueueRunnerDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueueRunnerDef -> Text
_QueueRunnerDef'closeOpName
           (\ x__ :: QueueRunnerDef
x__ y__ :: Text
y__ -> QueueRunnerDef
x__ {_QueueRunnerDef'closeOpName :: Text
_QueueRunnerDef'closeOpName = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueueRunnerDef "cancelOpName" Data.Text.Text where
  fieldOf :: Proxy# "cancelOpName"
-> (Text -> f Text) -> QueueRunnerDef -> f QueueRunnerDef
fieldOf _
    = ((Text -> f Text) -> QueueRunnerDef -> f QueueRunnerDef)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> QueueRunnerDef
-> f QueueRunnerDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueueRunnerDef -> Text)
-> (QueueRunnerDef -> Text -> QueueRunnerDef)
-> Lens QueueRunnerDef QueueRunnerDef Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueueRunnerDef -> Text
_QueueRunnerDef'cancelOpName
           (\ x__ :: QueueRunnerDef
x__ y__ :: Text
y__ -> QueueRunnerDef
x__ {_QueueRunnerDef'cancelOpName :: Text
_QueueRunnerDef'cancelOpName = Text
y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueueRunnerDef "queueClosedExceptionTypes" [Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code] where
  fieldOf :: Proxy# "queueClosedExceptionTypes"
-> ([Code] -> f [Code]) -> QueueRunnerDef -> f QueueRunnerDef
fieldOf _
    = ((Vector Code -> f (Vector Code))
 -> QueueRunnerDef -> f QueueRunnerDef)
-> (([Code] -> f [Code]) -> Vector Code -> f (Vector Code))
-> ([Code] -> f [Code])
-> QueueRunnerDef
-> f QueueRunnerDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueueRunnerDef -> Vector Code)
-> (QueueRunnerDef -> Vector Code -> QueueRunnerDef)
-> Lens QueueRunnerDef QueueRunnerDef (Vector Code) (Vector Code)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueueRunnerDef -> Vector Code
_QueueRunnerDef'queueClosedExceptionTypes
           (\ x__ :: QueueRunnerDef
x__ y__ :: Vector Code
y__
              -> QueueRunnerDef
x__ {_QueueRunnerDef'queueClosedExceptionTypes :: Vector Code
_QueueRunnerDef'queueClosedExceptionTypes = Vector Code
y__}))
        ((Vector Code -> [Code])
-> (Vector Code -> [Code] -> Vector Code)
-> Lens (Vector Code) (Vector Code) [Code] [Code]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Code -> [Code]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ _ y__ :: [Code]
y__ -> [Code] -> Vector Code
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Code]
y__))
instance Data.ProtoLens.Field.HasField QueueRunnerDef "vec'queueClosedExceptionTypes" (Data.Vector.Vector Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code) where
  fieldOf :: Proxy# "vec'queueClosedExceptionTypes"
-> (Vector Code -> f (Vector Code))
-> QueueRunnerDef
-> f QueueRunnerDef
fieldOf _
    = ((Vector Code -> f (Vector Code))
 -> QueueRunnerDef -> f QueueRunnerDef)
-> ((Vector Code -> f (Vector Code))
    -> Vector Code -> f (Vector Code))
-> (Vector Code -> f (Vector Code))
-> QueueRunnerDef
-> f QueueRunnerDef
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueueRunnerDef -> Vector Code)
-> (QueueRunnerDef -> Vector Code -> QueueRunnerDef)
-> Lens QueueRunnerDef QueueRunnerDef (Vector Code) (Vector Code)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueueRunnerDef -> Vector Code
_QueueRunnerDef'queueClosedExceptionTypes
           (\ x__ :: QueueRunnerDef
x__ y__ :: Vector Code
y__
              -> QueueRunnerDef
x__ {_QueueRunnerDef'queueClosedExceptionTypes :: Vector Code
_QueueRunnerDef'queueClosedExceptionTypes = Vector Code
y__}))
        (Vector Code -> f (Vector Code)) -> Vector Code -> f (Vector Code)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message QueueRunnerDef where
  messageName :: Proxy QueueRunnerDef -> Text
messageName _ = String -> Text
Data.Text.pack "tensorflow.QueueRunnerDef"
  packedMessageDescriptor :: Proxy QueueRunnerDef -> ByteString
packedMessageDescriptor _
    = "\n\
      \\SOQueueRunnerDef\DC2\GS\n\
      \\n\
      \queue_name\CAN\SOH \SOH(\tR\tqueueName\DC2&\n\
      \\SIenqueue_op_name\CAN\STX \ETX(\tR\renqueueOpName\DC2\"\n\
      \\rclose_op_name\CAN\ETX \SOH(\tR\vcloseOpName\DC2$\n\
      \\SOcancel_op_name\CAN\EOT \SOH(\tR\fcancelOpName\DC2W\n\
      \\FSqueue_closed_exception_types\CAN\ENQ \ETX(\SO2\SYN.tensorflow.error.CodeR\EMqueueClosedExceptionTypes"
  packedFileDescriptor :: Proxy QueueRunnerDef -> ByteString
packedFileDescriptor _ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor QueueRunnerDef)
fieldsByTag
    = let
        queueName__field_descriptor :: FieldDescriptor QueueRunnerDef
queueName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor QueueRunnerDef Text
-> FieldDescriptor QueueRunnerDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "queue_name"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens QueueRunnerDef QueueRunnerDef Text Text
-> FieldAccessor QueueRunnerDef Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "queueName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"queueName")) ::
              Data.ProtoLens.FieldDescriptor QueueRunnerDef
        enqueueOpName__field_descriptor :: FieldDescriptor QueueRunnerDef
enqueueOpName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor QueueRunnerDef Text
-> FieldDescriptor QueueRunnerDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "enqueue_op_name"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Packing
-> Lens' QueueRunnerDef [Text] -> FieldAccessor QueueRunnerDef Text
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall s a (f :: * -> *).
(HasField s "enqueueOpName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"enqueueOpName")) ::
              Data.ProtoLens.FieldDescriptor QueueRunnerDef
        closeOpName__field_descriptor :: FieldDescriptor QueueRunnerDef
closeOpName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor QueueRunnerDef Text
-> FieldDescriptor QueueRunnerDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "close_op_name"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens QueueRunnerDef QueueRunnerDef Text Text
-> FieldAccessor QueueRunnerDef Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "closeOpName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"closeOpName")) ::
              Data.ProtoLens.FieldDescriptor QueueRunnerDef
        cancelOpName__field_descriptor :: FieldDescriptor QueueRunnerDef
cancelOpName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor QueueRunnerDef Text
-> FieldDescriptor QueueRunnerDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "cancel_op_name"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens QueueRunnerDef QueueRunnerDef Text Text
-> FieldAccessor QueueRunnerDef Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall s a (f :: * -> *).
(HasField s "cancelOpName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cancelOpName")) ::
              Data.ProtoLens.FieldDescriptor QueueRunnerDef
        queueClosedExceptionTypes__field_descriptor :: FieldDescriptor QueueRunnerDef
queueClosedExceptionTypes__field_descriptor
          = String
-> FieldTypeDescriptor Code
-> FieldAccessor QueueRunnerDef Code
-> FieldDescriptor QueueRunnerDef
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              "queue_closed_exception_types"
              (ScalarField Code -> FieldTypeDescriptor Code
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Code
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code)
              (Packing
-> Lens' QueueRunnerDef [Code] -> FieldAccessor QueueRunnerDef Code
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed
                 (forall s a (f :: * -> *).
(HasField s "queueClosedExceptionTypes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"queueClosedExceptionTypes")) ::
              Data.ProtoLens.FieldDescriptor QueueRunnerDef
      in
        [(Tag, FieldDescriptor QueueRunnerDef)]
-> Map Tag (FieldDescriptor QueueRunnerDef)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag 1, FieldDescriptor QueueRunnerDef
queueName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 2, FieldDescriptor QueueRunnerDef
enqueueOpName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 3, FieldDescriptor QueueRunnerDef
closeOpName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 4, FieldDescriptor QueueRunnerDef
cancelOpName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag 5, 
            FieldDescriptor QueueRunnerDef
queueClosedExceptionTypes__field_descriptor)]
  unknownFields :: LensLike' f QueueRunnerDef FieldSet
unknownFields
    = (QueueRunnerDef -> FieldSet)
-> (QueueRunnerDef -> FieldSet -> QueueRunnerDef)
-> Lens' QueueRunnerDef FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        QueueRunnerDef -> FieldSet
_QueueRunnerDef'_unknownFields
        (\ x__ :: QueueRunnerDef
x__ y__ :: FieldSet
y__ -> QueueRunnerDef
x__ {_QueueRunnerDef'_unknownFields :: FieldSet
_QueueRunnerDef'_unknownFields = FieldSet
y__})
  defMessage :: QueueRunnerDef
defMessage
    = $WQueueRunnerDef'_constructor :: Text
-> Vector Text
-> Text
-> Text
-> Vector Code
-> FieldSet
-> QueueRunnerDef
QueueRunnerDef'_constructor
        {_QueueRunnerDef'queueName :: Text
_QueueRunnerDef'queueName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _QueueRunnerDef'enqueueOpName :: Vector Text
_QueueRunnerDef'enqueueOpName = Vector Text
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _QueueRunnerDef'closeOpName :: Text
_QueueRunnerDef'closeOpName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _QueueRunnerDef'cancelOpName :: Text
_QueueRunnerDef'cancelOpName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _QueueRunnerDef'queueClosedExceptionTypes :: Vector Code
_QueueRunnerDef'queueClosedExceptionTypes = Vector Code
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _QueueRunnerDef'_unknownFields :: FieldSet
_QueueRunnerDef'_unknownFields = []}
  parseMessage :: Parser QueueRunnerDef
parseMessage
    = let
        loop ::
          QueueRunnerDef
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code
                -> Data.ProtoLens.Encoding.Bytes.Parser QueueRunnerDef
        loop :: QueueRunnerDef
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Code
-> Parser QueueRunnerDef
loop x :: QueueRunnerDef
x mutable'enqueueOpName :: Growing Vector RealWorld Text
mutable'enqueueOpName mutable'queueClosedExceptionTypes :: Growing Vector RealWorld Code
mutable'queueClosedExceptionTypes
          = do Bool
end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if Bool
end then
                   do Vector Text
frozen'enqueueOpName <- IO (Vector Text) -> Parser (Vector Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                (Growing Vector (PrimState IO) Text -> IO (Vector Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                   Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'enqueueOpName)
                      Vector Code
frozen'queueClosedExceptionTypes <- IO (Vector Code) -> Parser (Vector Code)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                            (Growing Vector (PrimState IO) Code -> IO (Vector Code)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> m (v a)
Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                               Growing Vector RealWorld Code
Growing Vector (PrimState IO) Code
mutable'queueClosedExceptionTypes)
                      (let missing :: [a]
missing = []
                       in
                         if [Any] -> Bool
forall (t :: * -> *) a. Foldable t => t a -> Bool
Prelude.null [Any]
forall a. [a]
missing then
                             () -> Parser ()
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return ()
                         else
                             String -> Parser ()
forall (m :: * -> *) a. MonadFail m => String -> m a
Prelude.fail
                               (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
                                  "Missing required fields: "
                                  ([String] -> String
forall a. Show a => a -> String
Prelude.show ([String]
forall a. [a]
missing :: [Prelude.String]))))
                      QueueRunnerDef -> Parser QueueRunnerDef
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return
                        (Setter QueueRunnerDef QueueRunnerDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> QueueRunnerDef -> QueueRunnerDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                           forall msg. Message msg => Lens' msg FieldSet
Setter QueueRunnerDef QueueRunnerDef FieldSet FieldSet
Data.ProtoLens.unknownFields
                           (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Setter QueueRunnerDef QueueRunnerDef (Vector Text) (Vector Text)
-> Vector Text -> QueueRunnerDef -> QueueRunnerDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                              (forall s a (f :: * -> *).
(HasField s "vec'enqueueOpName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'enqueueOpName")
                              Vector Text
frozen'enqueueOpName
                              (Setter QueueRunnerDef QueueRunnerDef (Vector Code) (Vector Code)
-> Vector Code -> QueueRunnerDef -> QueueRunnerDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall s a (f :: * -> *).
(HasField s "vec'queueClosedExceptionTypes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'queueClosedExceptionTypes")
                                 Vector Code
frozen'queueClosedExceptionTypes
                                 QueueRunnerDef
x)))
               else
                   do Word64
tag <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                      case Word64
tag of
                        10
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "queue_name"
                                QueueRunnerDef
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Code
-> Parser QueueRunnerDef
loop
                                  (Setter QueueRunnerDef QueueRunnerDef Text Text
-> Text -> QueueRunnerDef -> QueueRunnerDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "queueName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"queueName") Text
y QueueRunnerDef
x)
                                  Growing Vector RealWorld Text
mutable'enqueueOpName
                                  Growing Vector RealWorld Code
mutable'queueClosedExceptionTypes
                        18
                          -> do !Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                        Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                            Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                              (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                 (Prelude.Left err :: UnicodeException
err)
                                                   -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                 (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                        "enqueue_op_name"
                                Growing Vector RealWorld Text
v <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Text
-> Text -> IO (Growing Vector (PrimState IO) Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                          Growing Vector RealWorld Text
Growing Vector (PrimState IO) Text
mutable'enqueueOpName Text
y)
                                QueueRunnerDef
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Code
-> Parser QueueRunnerDef
loop QueueRunnerDef
x Growing Vector RealWorld Text
v Growing Vector RealWorld Code
mutable'queueClosedExceptionTypes
                        26
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "close_op_name"
                                QueueRunnerDef
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Code
-> Parser QueueRunnerDef
loop
                                  (Setter QueueRunnerDef QueueRunnerDef Text Text
-> Text -> QueueRunnerDef -> QueueRunnerDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set (forall s a (f :: * -> *).
(HasField s "closeOpName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"closeOpName") Text
y QueueRunnerDef
x)
                                  Growing Vector RealWorld Text
mutable'enqueueOpName
                                  Growing Vector RealWorld Code
mutable'queueClosedExceptionTypes
                        34
                          -> do Text
y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do ByteString
value <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                       Int -> Parser ByteString
Data.ProtoLens.Encoding.Bytes.getBytes
                                                         (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                           Either String Text -> Parser Text
forall a. Either String a -> Parser a
Data.ProtoLens.Encoding.Bytes.runEither
                                             (case ByteString -> Either UnicodeException Text
Data.Text.Encoding.decodeUtf8' ByteString
value of
                                                (Prelude.Left err :: UnicodeException
err)
                                                  -> String -> Either String Text
forall a b. a -> Either a b
Prelude.Left (UnicodeException -> String
forall a. Show a => a -> String
Prelude.show UnicodeException
err)
                                                (Prelude.Right r :: Text
r) -> Text -> Either String Text
forall a b. b -> Either a b
Prelude.Right Text
r))
                                       "cancel_op_name"
                                QueueRunnerDef
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Code
-> Parser QueueRunnerDef
loop
                                  (Setter QueueRunnerDef QueueRunnerDef Text Text
-> Text -> QueueRunnerDef -> QueueRunnerDef
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                     (forall s a (f :: * -> *).
(HasField s "cancelOpName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cancelOpName") Text
y QueueRunnerDef
x)
                                  Growing Vector RealWorld Text
mutable'enqueueOpName
                                  Growing Vector RealWorld Code
mutable'queueClosedExceptionTypes
                        40
                          -> do !Code
y <- Parser Code -> String -> Parser Code
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Int -> Code) -> Parser Int -> Parser Code
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Int -> Code
forall a. Enum a => Int -> a
Prelude.toEnum
                                           ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                              Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                              Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                        "queue_closed_exception_types"
                                Growing Vector RealWorld Code
v <- IO (Growing Vector RealWorld Code)
-> Parser (Growing Vector RealWorld Code)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Growing Vector (PrimState IO) Code
-> Code -> IO (Growing Vector (PrimState IO) Code)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                          Growing Vector RealWorld Code
Growing Vector (PrimState IO) Code
mutable'queueClosedExceptionTypes Code
y)
                                QueueRunnerDef
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Code
-> Parser QueueRunnerDef
loop QueueRunnerDef
x Growing Vector RealWorld Text
mutable'enqueueOpName Growing Vector RealWorld Code
v
                        42
                          -> do Growing Vector RealWorld Code
y <- do Word64
len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Int
-> Parser (Growing Vector RealWorld Code)
-> Parser (Growing Vector RealWorld Code)
forall a. Int -> Parser a -> Parser a
Data.ProtoLens.Encoding.Bytes.isolate
                                          (Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word64
len)
                                          ((let
                                              ploop :: Growing v RealWorld a -> Parser (Growing v RealWorld a)
ploop qs :: Growing v RealWorld a
qs
                                                = do Bool
packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if Bool
packedEnd then
                                                         Growing v RealWorld a -> Parser (Growing v RealWorld a)
forall (m :: * -> *) a. Monad m => a -> m a
Prelude.return Growing v RealWorld a
qs
                                                     else
                                                         do !a
q <- Parser a -> String -> Parser a
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    ((Int -> a) -> Parser Int -> Parser a
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                                                       Int -> a
forall a. Enum a => Int -> a
Prelude.toEnum
                                                                       ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                                                          Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                                                    "queue_closed_exception_types"
                                                            Growing v RealWorld a
qs' <- IO (Growing v RealWorld a) -> Parser (Growing v RealWorld a)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Growing v (PrimState IO) a -> a -> IO (Growing v (PrimState IO) a)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
Growing v (PrimState m) a -> a -> m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.append
                                                                        Growing v RealWorld a
Growing v (PrimState IO) a
qs a
q)
                                                            Growing v RealWorld a -> Parser (Growing v RealWorld a)
ploop Growing v RealWorld a
qs'
                                            in forall a (v :: * -> *).
(Enum a, Vector v a) =>
Growing v RealWorld a -> Parser (Growing v RealWorld a)
ploop)
                                             Growing Vector RealWorld Code
mutable'queueClosedExceptionTypes)
                                QueueRunnerDef
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Code
-> Parser QueueRunnerDef
loop QueueRunnerDef
x Growing Vector RealWorld Text
mutable'enqueueOpName Growing Vector RealWorld Code
y
                        wire :: Word64
wire
                          -> do !TaggedValue
y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                QueueRunnerDef
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Code
-> Parser QueueRunnerDef
loop
                                  (Setter QueueRunnerDef QueueRunnerDef FieldSet FieldSet
-> (FieldSet -> FieldSet) -> QueueRunnerDef -> QueueRunnerDef
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
Lens.Family2.over
                                     forall msg. Message msg => Lens' msg FieldSet
Setter QueueRunnerDef QueueRunnerDef FieldSet FieldSet
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) QueueRunnerDef
x)
                                  Growing Vector RealWorld Text
mutable'enqueueOpName
                                  Growing Vector RealWorld Code
mutable'queueClosedExceptionTypes
      in
        Parser QueueRunnerDef -> String -> Parser QueueRunnerDef
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do Growing Vector RealWorld Text
mutable'enqueueOpName <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                         IO (Growing Vector RealWorld Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              Growing Vector RealWorld Code
mutable'queueClosedExceptionTypes <- IO (Growing Vector RealWorld Code)
-> Parser (Growing Vector RealWorld Code)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                     IO (Growing Vector RealWorld Code)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              QueueRunnerDef
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Code
-> Parser QueueRunnerDef
loop
                QueueRunnerDef
forall msg. Message msg => msg
Data.ProtoLens.defMessage
                Growing Vector RealWorld Text
mutable'enqueueOpName
                Growing Vector RealWorld Code
mutable'queueClosedExceptionTypes)
          "QueueRunnerDef"
  buildMessage :: QueueRunnerDef -> Builder
buildMessage
    = \ _x :: QueueRunnerDef
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text QueueRunnerDef QueueRunnerDef Text Text
-> QueueRunnerDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "queueName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"queueName") QueueRunnerDef
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ bs :: ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         Text -> ByteString
Data.Text.Encoding.encodeUtf8
                         Text
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((Text -> Builder) -> Vector Text -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ _v :: Text
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 18)
                           ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ bs :: ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              Text -> ByteString
Data.Text.Encoding.encodeUtf8
                              Text
_v))
                   (FoldLike
  (Vector Text)
  QueueRunnerDef
  QueueRunnerDef
  (Vector Text)
  (Vector Text)
-> QueueRunnerDef -> Vector Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall s a (f :: * -> *).
(HasField s "vec'enqueueOpName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'enqueueOpName") QueueRunnerDef
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v
                        = FoldLike Text QueueRunnerDef QueueRunnerDef Text Text
-> QueueRunnerDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "closeOpName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"closeOpName") QueueRunnerDef
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ bs :: ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8
                               Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v
                           = FoldLike Text QueueRunnerDef QueueRunnerDef Text Text
-> QueueRunnerDef -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall s a (f :: * -> *).
(HasField s "cancelOpName" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cancelOpName") QueueRunnerDef
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ bs :: ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8
                                  Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            p :: Vector Code
p = FoldLike
  (Vector Code)
  QueueRunnerDef
  QueueRunnerDef
  (Vector Code)
  (Vector Code)
-> QueueRunnerDef -> Vector Code
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall s a (f :: * -> *).
(HasField s "vec'queueClosedExceptionTypes" a, Functor f) =>
(a -> f a) -> s -> f s
forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'queueClosedExceptionTypes") QueueRunnerDef
_x
                          in
                            if Vector Code -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Code
p then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt 42)
                                  ((\ bs :: ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     (Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
                                        ((Code -> Builder) -> Vector Code -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                           ((Int -> Builder) -> (Code -> Int) -> Code -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                              ((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                 Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                                              Code -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum)
                                           Vector Code
p))))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike FieldSet QueueRunnerDef QueueRunnerDef FieldSet FieldSet
-> QueueRunnerDef -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet QueueRunnerDef QueueRunnerDef FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Data.ProtoLens.unknownFields QueueRunnerDef
_x))))))
instance Control.DeepSeq.NFData QueueRunnerDef where
  rnf :: QueueRunnerDef -> ()
rnf
    = \ x__ :: QueueRunnerDef
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (QueueRunnerDef -> FieldSet
_QueueRunnerDef'_unknownFields QueueRunnerDef
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (QueueRunnerDef -> Text
_QueueRunnerDef'queueName QueueRunnerDef
x__)
                (Vector Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (QueueRunnerDef -> Vector Text
_QueueRunnerDef'enqueueOpName QueueRunnerDef
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (QueueRunnerDef -> Text
_QueueRunnerDef'closeOpName QueueRunnerDef
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (QueueRunnerDef -> Text
_QueueRunnerDef'cancelOpName QueueRunnerDef
x__)
                         (Vector Code -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (QueueRunnerDef -> Vector Code
_QueueRunnerDef'queueClosedExceptionTypes QueueRunnerDef
x__) ())))))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = "\n\
    \+tensorflow/core/protobuf/queue_runner.proto\DC2\n\
    \tensorflow\SUB*tensorflow/core/protobuf/error_codes.proto\"\250\SOH\n\
    \\SOQueueRunnerDef\DC2\GS\n\
    \\n\
    \queue_name\CAN\SOH \SOH(\tR\tqueueName\DC2&\n\
    \\SIenqueue_op_name\CAN\STX \ETX(\tR\renqueueOpName\DC2\"\n\
    \\rclose_op_name\CAN\ETX \SOH(\tR\vcloseOpName\DC2$\n\
    \\SOcancel_op_name\CAN\EOT \SOH(\tR\fcancelOpName\DC2W\n\
    \\FSqueue_closed_exception_types\CAN\ENQ \ETX(\SO2\SYN.tensorflow.error.CodeR\EMqueueClosedExceptionTypesB|\n\
    \\CANorg.tensorflow.frameworkB\DC1QueueRunnerProtosP\SOHZHgithub.com/tensorflow/tensorflow/tensorflow/go/core/core_protos_go_proto\248\SOH\SOHJ\253\ENQ\n\
    \\ACK\DC2\EOT\NUL\NUL\GS\SOH\n\
    \\b\n\
    \\SOH\f\DC2\ETX\NUL\NUL\DC2\n\
    \\b\n\
    \\SOH\STX\DC2\ETX\STX\NUL\DC3\n\
    \\t\n\
    \\STX\ETX\NUL\DC2\ETX\EOT\NUL4\n\
    \\b\n\
    \\SOH\b\DC2\ETX\ACK\NUL\US\n\
    \\t\n\
    \\STX\b\US\DC2\ETX\ACK\NUL\US\n\
    \\b\n\
    \\SOH\b\DC2\ETX\a\NUL2\n\
    \\t\n\
    \\STX\b\b\DC2\ETX\a\NUL2\n\
    \\b\n\
    \\SOH\b\DC2\ETX\b\NUL\"\n\
    \\t\n\
    \\STX\b\n\
    \\DC2\ETX\b\NUL\"\n\
    \\b\n\
    \\SOH\b\DC2\ETX\t\NUL1\n\
    \\t\n\
    \\STX\b\SOH\DC2\ETX\t\NUL1\n\
    \\b\n\
    \\SOH\b\DC2\ETX\n\
    \\NUL_\n\
    \\t\n\
    \\STX\b\v\DC2\ETX\n\
    \\NUL_\n\
    \9\n\
    \\STX\EOT\NUL\DC2\EOT\r\NUL\GS\SOH\SUB- Protocol buffer representing a QueueRunner.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX\r\b\SYN\n\
    \\SUB\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETX\SI\STX\CAN\SUB\r Queue name.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\SI\STX\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\SI\t\DC3\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\SI\SYN\ETB\n\
    \,\n\
    \\EOT\EOT\NUL\STX\SOH\DC2\ETX\DC2\STX&\SUB\US A list of enqueue operations.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX\DC2\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX\DC2\v\DC1\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DC2\DC2!\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DC2$%\n\
    \7\n\
    \\EOT\EOT\NUL\STX\STX\DC2\ETX\NAK\STX\ESC\SUB* The operation to run to close the queue.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX\NAK\STX\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX\NAK\t\SYN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX\NAK\EM\SUB\n\
    \8\n\
    \\EOT\EOT\NUL\STX\ETX\DC2\ETX\CAN\STX\FS\SUB+ The operation to run to cancel the queue.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ENQ\DC2\ETX\CAN\STX\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX\CAN\t\ETB\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX\CAN\SUB\ESC\n\
    \y\n\
    \\EOT\EOT\NUL\STX\EOT\DC2\ETX\FS\STX7\SUBl A list of exception types considered to signal a safely closed queue\n\
    \ if raised during enqueue operations.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\EOT\DC2\ETX\FS\STX\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ACK\DC2\ETX\FS\v\NAK\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX\FS\SYN2\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX\FS56b\ACKproto3"