mirror of
https://github.com/tensorflow/haskell.git
synced 2024-06-02 02:53:35 +02:00
6b19e54722
* Update README to refer to 2.3.0-gpu. * Remove old package documentation from haddock directory.
1577 lines
201 KiB
HTML
1577 lines
201 KiB
HTML
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><link rel="stylesheet" type="text/css" href="style.css" /><script type="text/javascript" src="highlight.js"></script></head><body><pre><span class="hs-comment">{- This file was auto-generated from tensorflow/core/protobuf/queue_runner.proto by the proto-lens-protoc program. -}</span><span>
|
|
</span><span id="line-2"></span><span class="hs-pragma">{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-}</span><span>
|
|
</span><span id="line-3"></span><span class="hs-pragma">{-# OPTIONS_GHC -Wno-unused-imports#-}</span><span>
|
|
</span><span id="line-4"></span><span class="hs-pragma">{-# OPTIONS_GHC -Wno-duplicate-exports#-}</span><span>
|
|
</span><span id="line-5"></span><span class="hs-pragma">{-# OPTIONS_GHC -Wno-dodgy-exports#-}</span><span>
|
|
</span><span id="line-6"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">Proto.Tensorflow.Core.Protobuf.QueueRunner</span><span> </span><span class="hs-special">(</span><span>
|
|
</span><span id="line-7"></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier">QueueRunnerDef</span></a></span><span class="hs-special">(</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-8"></span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-9"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Control.DeepSeq</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Control.DeepSeq</span></span><span>
|
|
</span><span id="line-10"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ProtoLens.Prism</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Prism</span></span><span>
|
|
</span><span id="line-11"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span>
|
|
</span><span id="line-12"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.Int</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.Int</span></span><span>
|
|
</span><span id="line-13"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.Monoid</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.Monoid</span></span><span>
|
|
</span><span id="line-14"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.Word</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.Word</span></span><span>
|
|
</span><span id="line-15"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ProtoLens</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens</span></span><span>
|
|
</span><span id="line-16"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Encoding.Bytes</span></span><span>
|
|
</span><span id="line-17"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Encoding.Growing</span></span><span>
|
|
</span><span id="line-18"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Encoding.Parser.Unsafe</span></span><span>
|
|
</span><span id="line-19"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Encoding.Wire</span></span><span>
|
|
</span><span id="line-20"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ProtoLens.Field</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Field</span></span><span>
|
|
</span><span id="line-21"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Message.Enum</span></span><span>
|
|
</span><span id="line-22"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Service.Types</span></span><span>
|
|
</span><span id="line-23"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Lens.Family2</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Lens.Family2</span></span><span>
|
|
</span><span id="line-24"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Lens.Family2.Unchecked</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Lens.Family2.Unchecked</span></span><span>
|
|
</span><span id="line-25"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.Text</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span>
|
|
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.Map</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.Map</span></span><span>
|
|
</span><span id="line-27"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ByteString</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString</span></span><span>
|
|
</span><span id="line-28"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.ByteString.Char8</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Char8</span></span><span>
|
|
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.Text.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Encoding</span></span><span>
|
|
</span><span id="line-30"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.Vector</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.Vector</span></span><span>
|
|
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.Vector.Generic</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.Vector.Generic</span></span><span>
|
|
</span><span id="line-32"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Data.Vector.Unboxed</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Data.Vector.Unboxed</span></span><span>
|
|
</span><span id="line-33"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ProtoLens.Runtime.Text.Read</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Text.Read</span></span><span>
|
|
</span><span id="line-34"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.ErrorCodes.html"><span class="hs-identifier">Proto.Tensorflow.Core.Protobuf.ErrorCodes</span></a></span><span>
|
|
</span><span id="line-35"></span><span class="hs-comment">{- | 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)@ -}</span><span>
|
|
</span><span id="line-44"></span><span class="hs-keyword">data</span><span> </span><span id="QueueRunnerDef"><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-var">QueueRunnerDef</span></a></span></span><span>
|
|
</span><span id="line-45"></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="QueueRunnerDef%27_constructor"><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef%27_constructor"><span class="hs-identifier hs-var">QueueRunnerDef'_constructor</span></a></span></span><span> </span><span class="hs-special">{</span><span id="_QueueRunnerDef%27queueName"><span class="annot"><span class="annottext">QueueRunnerDef -> Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'queueName</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-glyph">!</span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span class="hs-special">,</span><span>
|
|
</span><span id="line-46"></span><span> </span><span id="_QueueRunnerDef%27enqueueOpName"><span class="annot"><span class="annottext">QueueRunnerDef -> Vector Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27enqueueOpName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'enqueueOpName</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-glyph">!</span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Data.Vector.Vector</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span class="hs-special">)</span><span class="hs-special">,</span><span>
|
|
</span><span id="line-47"></span><span> </span><span id="_QueueRunnerDef%27closeOpName"><span class="annot"><span class="annottext">QueueRunnerDef -> Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27closeOpName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'closeOpName</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-glyph">!</span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span class="hs-special">,</span><span>
|
|
</span><span id="line-48"></span><span> </span><span id="_QueueRunnerDef%27cancelOpName"><span class="annot"><span class="annottext">QueueRunnerDef -> Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27cancelOpName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'cancelOpName</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-glyph">!</span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span class="hs-special">,</span><span>
|
|
</span><span id="line-49"></span><span> </span><span id="_QueueRunnerDef%27queueClosedExceptionTypes"><span class="annot"><span class="annottext">QueueRunnerDef -> Vector Code
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueClosedExceptionTypes"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'queueClosedExceptionTypes</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-glyph">!</span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Data.Vector.Vector</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.ErrorCodes.html#Code"><span class="hs-identifier hs-type">Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code</span></a></span><span class="hs-special">)</span><span class="hs-special">,</span><span>
|
|
</span><span id="line-50"></span><span> </span><span id="_QueueRunnerDef%27_unknownFields"><span class="annot"><span class="annottext">QueueRunnerDef -> FieldSet
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27_unknownFields"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'_unknownFields</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-glyph">!</span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldSet</span></span><span class="hs-special">}</span><span>
|
|
</span><span id="line-51"></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="annot"><span class="hs-keyword">stock</span></span><span> </span><span class="hs-special">(</span><span id="local-6989586621679495259"><span id="local-6989586621679495261"><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var">Prelude.Eq</span></span></span></span><span class="hs-special">,</span><span> </span><span id="local-6989586621679495243"><span id="local-6989586621679495245"><span id="local-6989586621679495247"><span id="local-6989586621679495249"><span id="local-6989586621679495251"><span id="local-6989586621679495253"><span id="local-6989586621679495255"><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">Prelude.Ord</span></span></span></span></span></span></span></span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-52"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679495237"><span id="local-6989586621679495239"><span class="annot"><span class="hs-identifier hs-type">Prelude.Show</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-53"></span><span> </span><span id="local-6989586621679495235"><span class="annot"><span class="annottext">showsPrec :: Int -> QueueRunnerDef -> ShowS
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">showsPrec</span></span></span><span> </span><span class="hs-identifier">_</span><span> </span><span id="local-6989586621679495233"><span class="annot"><span class="annottext">__x :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495233"><span class="hs-identifier hs-var">__x</span></a></span></span><span> </span><span id="local-6989586621679495232"><span class="annot"><span class="annottext">__s :: String
|
|
</span><a href="#local-6989586621679495232"><span class="hs-identifier hs-var">__s</span></a></span></span><span>
|
|
</span><span id="line-54"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Char -> ShowS
|
|
</span><span class="hs-identifier hs-var">Prelude.showChar</span></span><span>
|
|
</span><span id="line-55"></span><span> </span><span class="annot"><span class="hs-char">'{'</span></span><span>
|
|
</span><span id="line-56"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -> ShowS
|
|
</span><span class="hs-identifier hs-var">Prelude.showString</span></span><span>
|
|
</span><span id="line-57"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">QueueRunnerDef -> String
|
|
forall msg. Message msg => msg -> String
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.showMessageShort</span></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495233"><span class="hs-identifier hs-var">__x</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Char -> ShowS
|
|
</span><span class="hs-identifier hs-var">Prelude.showChar</span></span><span> </span><span class="annot"><span class="hs-char">'}'</span></span><span> </span><span class="annot"><span class="annottext">String
|
|
</span><a href="#local-6989586621679495232"><span class="hs-identifier hs-var">__s</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-58"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Field.HasField</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span> </span><span class="annot"><span class="hs-string">"queueName"</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-59"></span><span> </span><span id="local-6989586621679495226"><span class="annot"><span class="annottext">fieldOf :: Proxy# "queueName"
|
|
-> (Text -> f Text) -> QueueRunnerDef -> f QueueRunnerDef
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">fieldOf</span></span></span><span> </span><span class="hs-identifier">_</span><span>
|
|
</span><span id="line-60"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">((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
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-61"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.Unchecked.lens</span></span><span>
|
|
</span><span id="line-62"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef -> Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'queueName</span></a></span><span>
|
|
</span><span id="line-63"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495222"><span class="annot"><span class="annottext">x__ :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495222"><span class="hs-identifier hs-var">x__</span></a></span></span><span> </span><span id="local-6989586621679495221"><span class="annot"><span class="annottext">y__ :: Text
|
|
</span><a href="#local-6989586621679495221"><span class="hs-identifier hs-var">y__</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495222"><span class="hs-identifier hs-var">x__</span></a></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">_QueueRunnerDef'queueName :: Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueName"><span class="hs-identifier hs-var">_QueueRunnerDef'queueName</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495221"><span class="hs-identifier hs-var">y__</span></a></span><span class="hs-special">}</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-64"></span><span> </span><span class="annot"><span class="annottext">(Text -> f Text) -> Text -> f Text
|
|
forall a. a -> a
|
|
</span><span class="hs-identifier hs-var">Prelude.id</span></span><span>
|
|
</span><span id="line-65"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Field.HasField</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span> </span><span class="annot"><span class="hs-string">"enqueueOpName"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span class="hs-special">]</span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-66"></span><span> </span><span id="local-6989586621679495218"><span class="annot"><span class="annottext">fieldOf :: Proxy# "enqueueOpName"
|
|
-> ([Text] -> f [Text]) -> QueueRunnerDef -> f QueueRunnerDef
|
|
</span><a href="#local-6989586621679495218"><span class="hs-identifier hs-var hs-var hs-var hs-var">fieldOf</span></a></span></span><span> </span><span class="hs-identifier">_</span><span>
|
|
</span><span id="line-67"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">((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
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-68"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.Unchecked.lens</span></span><span>
|
|
</span><span id="line-69"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef -> Vector Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27enqueueOpName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'enqueueOpName</span></a></span><span>
|
|
</span><span id="line-70"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495217"><span class="annot"><span class="annottext">x__ :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495217"><span class="hs-identifier hs-var">x__</span></a></span></span><span> </span><span id="local-6989586621679495216"><span class="annot"><span class="annottext">y__ :: Vector Text
|
|
</span><a href="#local-6989586621679495216"><span class="hs-identifier hs-var">y__</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495217"><span class="hs-identifier hs-var">x__</span></a></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">_QueueRunnerDef'enqueueOpName :: Vector Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27enqueueOpName"><span class="hs-identifier hs-var">_QueueRunnerDef'enqueueOpName</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Vector Text
|
|
</span><a href="#local-6989586621679495216"><span class="hs-identifier hs-var">y__</span></a></span><span class="hs-special">}</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-71"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.Unchecked.lens</span></span><span>
|
|
</span><span id="line-72"></span><span> </span><span class="annot"><span class="annottext">Vector Text -> [Text]
|
|
forall (v :: * -> *) a. Vector v a => v a -> [a]
|
|
</span><span class="hs-identifier hs-var">Data.Vector.Generic.toList</span></span><span>
|
|
</span><span id="line-73"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span class="hs-identifier">_</span><span> </span><span id="local-6989586621679495214"><span class="annot"><span class="annottext">y__ :: [Text]
|
|
</span><a href="#local-6989586621679495214"><span class="hs-identifier hs-var">y__</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">[Text] -> Vector Text
|
|
forall (v :: * -> *) a. Vector v a => [a] -> v a
|
|
</span><span class="hs-identifier hs-var">Data.Vector.Generic.fromList</span></span><span> </span><span class="annot"><span class="annottext">[Text]
|
|
</span><a href="#local-6989586621679495214"><span class="hs-identifier hs-var">y__</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-74"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Field.HasField</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span> </span><span class="annot"><span class="hs-string">"vec'enqueueOpName"</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Data.Vector.Vector</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-75"></span><span> </span><span id="local-6989586621679495211"><span class="annot"><span class="annottext">fieldOf :: Proxy# "vec'enqueueOpName"
|
|
-> (Vector Text -> f (Vector Text))
|
|
-> QueueRunnerDef
|
|
-> f QueueRunnerDef
|
|
</span><a href="#local-6989586621679495211"><span class="hs-identifier hs-var hs-var hs-var hs-var">fieldOf</span></a></span></span><span> </span><span class="hs-identifier">_</span><span>
|
|
</span><span id="line-76"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">((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
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-77"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.Unchecked.lens</span></span><span>
|
|
</span><span id="line-78"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef -> Vector Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27enqueueOpName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'enqueueOpName</span></a></span><span>
|
|
</span><span id="line-79"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495210"><span class="annot"><span class="annottext">x__ :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495210"><span class="hs-identifier hs-var">x__</span></a></span></span><span> </span><span id="local-6989586621679495209"><span class="annot"><span class="annottext">y__ :: Vector Text
|
|
</span><a href="#local-6989586621679495209"><span class="hs-identifier hs-var">y__</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495210"><span class="hs-identifier hs-var">x__</span></a></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">_QueueRunnerDef'enqueueOpName :: Vector Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27enqueueOpName"><span class="hs-identifier hs-var">_QueueRunnerDef'enqueueOpName</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Vector Text
|
|
</span><a href="#local-6989586621679495209"><span class="hs-identifier hs-var">y__</span></a></span><span class="hs-special">}</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-80"></span><span> </span><span class="annot"><span class="annottext">(Vector Text -> f (Vector Text)) -> Vector Text -> f (Vector Text)
|
|
forall a. a -> a
|
|
</span><span class="hs-identifier hs-var">Prelude.id</span></span><span>
|
|
</span><span id="line-81"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Field.HasField</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span> </span><span class="annot"><span class="hs-string">"closeOpName"</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-82"></span><span> </span><span id="local-6989586621679495207"><span class="annot"><span class="annottext">fieldOf :: Proxy# "closeOpName"
|
|
-> (Text -> f Text) -> QueueRunnerDef -> f QueueRunnerDef
|
|
</span><a href="#local-6989586621679495207"><span class="hs-identifier hs-var hs-var hs-var hs-var">fieldOf</span></a></span></span><span> </span><span class="hs-identifier">_</span><span>
|
|
</span><span id="line-83"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">((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
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-84"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.Unchecked.lens</span></span><span>
|
|
</span><span id="line-85"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef -> Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27closeOpName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'closeOpName</span></a></span><span>
|
|
</span><span id="line-86"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495206"><span class="annot"><span class="annottext">x__ :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495206"><span class="hs-identifier hs-var">x__</span></a></span></span><span> </span><span id="local-6989586621679495205"><span class="annot"><span class="annottext">y__ :: Text
|
|
</span><a href="#local-6989586621679495205"><span class="hs-identifier hs-var">y__</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495206"><span class="hs-identifier hs-var">x__</span></a></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">_QueueRunnerDef'closeOpName :: Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27closeOpName"><span class="hs-identifier hs-var">_QueueRunnerDef'closeOpName</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495205"><span class="hs-identifier hs-var">y__</span></a></span><span class="hs-special">}</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-87"></span><span> </span><span class="annot"><span class="annottext">(Text -> f Text) -> Text -> f Text
|
|
forall a. a -> a
|
|
</span><span class="hs-identifier hs-var">Prelude.id</span></span><span>
|
|
</span><span id="line-88"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Field.HasField</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span> </span><span class="annot"><span class="hs-string">"cancelOpName"</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-89"></span><span> </span><span id="local-6989586621679495203"><span class="annot"><span class="annottext">fieldOf :: Proxy# "cancelOpName"
|
|
-> (Text -> f Text) -> QueueRunnerDef -> f QueueRunnerDef
|
|
</span><a href="#local-6989586621679495203"><span class="hs-identifier hs-var hs-var hs-var hs-var">fieldOf</span></a></span></span><span> </span><span class="hs-identifier">_</span><span>
|
|
</span><span id="line-90"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">((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
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-91"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.Unchecked.lens</span></span><span>
|
|
</span><span id="line-92"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef -> Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27cancelOpName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'cancelOpName</span></a></span><span>
|
|
</span><span id="line-93"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495202"><span class="annot"><span class="annottext">x__ :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495202"><span class="hs-identifier hs-var">x__</span></a></span></span><span> </span><span id="local-6989586621679495201"><span class="annot"><span class="annottext">y__ :: Text
|
|
</span><a href="#local-6989586621679495201"><span class="hs-identifier hs-var">y__</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495202"><span class="hs-identifier hs-var">x__</span></a></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">_QueueRunnerDef'cancelOpName :: Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27cancelOpName"><span class="hs-identifier hs-var">_QueueRunnerDef'cancelOpName</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495201"><span class="hs-identifier hs-var">y__</span></a></span><span class="hs-special">}</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-94"></span><span> </span><span class="annot"><span class="annottext">(Text -> f Text) -> Text -> f Text
|
|
forall a. a -> a
|
|
</span><span class="hs-identifier hs-var">Prelude.id</span></span><span>
|
|
</span><span id="line-95"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Field.HasField</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span> </span><span class="annot"><span class="hs-string">"queueClosedExceptionTypes"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.ErrorCodes.html#Code"><span class="hs-identifier hs-type">Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code</span></a></span><span class="hs-special">]</span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-96"></span><span> </span><span id="local-6989586621679495199"><span class="annot"><span class="annottext">fieldOf :: Proxy# "queueClosedExceptionTypes"
|
|
-> ([Code] -> f [Code]) -> QueueRunnerDef -> f QueueRunnerDef
|
|
</span><a href="#local-6989586621679495199"><span class="hs-identifier hs-var hs-var hs-var hs-var">fieldOf</span></a></span></span><span> </span><span class="hs-identifier">_</span><span>
|
|
</span><span id="line-97"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">((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
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-98"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.Unchecked.lens</span></span><span>
|
|
</span><span id="line-99"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef -> Vector Code
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueClosedExceptionTypes"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'queueClosedExceptionTypes</span></a></span><span>
|
|
</span><span id="line-100"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495198"><span class="annot"><span class="annottext">x__ :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495198"><span class="hs-identifier hs-var">x__</span></a></span></span><span> </span><span id="local-6989586621679495197"><span class="annot"><span class="annottext">y__ :: Vector Code
|
|
</span><a href="#local-6989586621679495197"><span class="hs-identifier hs-var">y__</span></a></span></span><span>
|
|
</span><span id="line-101"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495198"><span class="hs-identifier hs-var">x__</span></a></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">_QueueRunnerDef'queueClosedExceptionTypes :: Vector Code
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueClosedExceptionTypes"><span class="hs-identifier hs-var">_QueueRunnerDef'queueClosedExceptionTypes</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Vector Code
|
|
</span><a href="#local-6989586621679495197"><span class="hs-identifier hs-var">y__</span></a></span><span class="hs-special">}</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-102"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.Unchecked.lens</span></span><span>
|
|
</span><span id="line-103"></span><span> </span><span class="annot"><span class="annottext">Vector Code -> [Code]
|
|
forall (v :: * -> *) a. Vector v a => v a -> [a]
|
|
</span><span class="hs-identifier hs-var">Data.Vector.Generic.toList</span></span><span>
|
|
</span><span id="line-104"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span class="hs-identifier">_</span><span> </span><span id="local-6989586621679495196"><span class="annot"><span class="annottext">y__ :: [Code]
|
|
</span><a href="#local-6989586621679495196"><span class="hs-identifier hs-var">y__</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">[Code] -> Vector Code
|
|
forall (v :: * -> *) a. Vector v a => [a] -> v a
|
|
</span><span class="hs-identifier hs-var">Data.Vector.Generic.fromList</span></span><span> </span><span class="annot"><span class="annottext">[Code]
|
|
</span><a href="#local-6989586621679495196"><span class="hs-identifier hs-var">y__</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-105"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Field.HasField</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span> </span><span class="annot"><span class="hs-string">"vec'queueClosedExceptionTypes"</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Data.Vector.Vector</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.ErrorCodes.html#Code"><span class="hs-identifier hs-type">Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-106"></span><span> </span><span id="local-6989586621679495194"><span class="annot"><span class="annottext">fieldOf :: Proxy# "vec'queueClosedExceptionTypes"
|
|
-> (Vector Code -> f (Vector Code))
|
|
-> QueueRunnerDef
|
|
-> f QueueRunnerDef
|
|
</span><a href="#local-6989586621679495194"><span class="hs-identifier hs-var hs-var hs-var hs-var">fieldOf</span></a></span></span><span> </span><span class="hs-identifier">_</span><span>
|
|
</span><span id="line-107"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">((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
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-108"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.Unchecked.lens</span></span><span>
|
|
</span><span id="line-109"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef -> Vector Code
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueClosedExceptionTypes"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'queueClosedExceptionTypes</span></a></span><span>
|
|
</span><span id="line-110"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495193"><span class="annot"><span class="annottext">x__ :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495193"><span class="hs-identifier hs-var">x__</span></a></span></span><span> </span><span id="local-6989586621679495192"><span class="annot"><span class="annottext">y__ :: Vector Code
|
|
</span><a href="#local-6989586621679495192"><span class="hs-identifier hs-var">y__</span></a></span></span><span>
|
|
</span><span id="line-111"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495193"><span class="hs-identifier hs-var">x__</span></a></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">_QueueRunnerDef'queueClosedExceptionTypes :: Vector Code
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueClosedExceptionTypes"><span class="hs-identifier hs-var">_QueueRunnerDef'queueClosedExceptionTypes</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Vector Code
|
|
</span><a href="#local-6989586621679495192"><span class="hs-identifier hs-var">y__</span></a></span><span class="hs-special">}</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-112"></span><span> </span><span class="annot"><span class="annottext">(Vector Code -> f (Vector Code)) -> Vector Code -> f (Vector Code)
|
|
forall a. a -> a
|
|
</span><span class="hs-identifier hs-var">Prelude.id</span></span><span>
|
|
</span><span id="line-113"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679495185"><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Message</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-114"></span><span> </span><span id="local-6989586621679495180"><span class="annot"><span class="annottext">messageName :: Proxy QueueRunnerDef -> Text
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">messageName</span></span></span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -> Text
|
|
</span><span class="hs-identifier hs-var">Data.Text.pack</span></span><span> </span><span class="annot"><span class="hs-string">"tensorflow.QueueRunnerDef"</span></span><span>
|
|
</span><span id="line-115"></span><span> </span><span id="local-6989586621679495177"><span class="annot"><span class="annottext">packedMessageDescriptor :: Proxy QueueRunnerDef -> ByteString
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">packedMessageDescriptor</span></span></span><span> </span><span class="hs-identifier">_</span><span>
|
|
</span><span id="line-116"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-string">"\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"</span></span><span>
|
|
</span><span id="line-124"></span><span> </span><span id="local-6989586621679495175"><span class="annot"><span class="annottext">packedFileDescriptor :: Proxy QueueRunnerDef -> ByteString
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">packedFileDescriptor</span></span></span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#packedFileDescriptor"><span class="hs-identifier hs-var">packedFileDescriptor</span></a></span><span>
|
|
</span><span id="line-125"></span><span> </span><span id="local-6989586621679495172"><span class="annot"><span class="annottext">fieldsByTag :: Map Tag (FieldDescriptor QueueRunnerDef)
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">fieldsByTag</span></span></span><span>
|
|
</span><span id="line-126"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">let</span><span>
|
|
</span><span id="line-127"></span><span> </span><span id="local-6989586621679495170"><span class="annot"><span class="annottext">queueName__field_descriptor :: FieldDescriptor QueueRunnerDef
|
|
</span><a href="#local-6989586621679495170"><span class="hs-identifier hs-var hs-var">queueName__field_descriptor</span></a></span></span><span>
|
|
</span><span id="line-128"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
|
-> FieldTypeDescriptor Text
|
|
-> FieldAccessor QueueRunnerDef Text
|
|
-> FieldDescriptor QueueRunnerDef
|
|
forall value msg.
|
|
String
|
|
-> FieldTypeDescriptor value
|
|
-> FieldAccessor msg value
|
|
-> FieldDescriptor msg
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.FieldDescriptor</span></span><span>
|
|
</span><span id="line-129"></span><span> </span><span class="annot"><span class="hs-string">"queue_name"</span></span><span>
|
|
</span><span id="line-130"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ScalarField Text -> FieldTypeDescriptor Text
|
|
forall value. ScalarField value -> FieldTypeDescriptor value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.ScalarField</span></span><span> </span><span class="annot"><span class="annottext">ScalarField Text
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.StringField</span></span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-131"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldTypeDescriptor</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-132"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">WireDefault Text
|
|
-> Lens QueueRunnerDef QueueRunnerDef Text Text
|
|
-> FieldAccessor QueueRunnerDef Text
|
|
forall value msg.
|
|
WireDefault value -> Lens' msg value -> FieldAccessor msg value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.PlainField</span></span><span>
|
|
</span><span id="line-133"></span><span> </span><span class="annot"><span class="annottext">WireDefault Text
|
|
forall value. (FieldDefault value, Eq value) => WireDefault value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Optional</span></span><span>
|
|
</span><span id="line-134"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"queueName"</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-135"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldDescriptor</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span>
|
|
</span><span id="line-136"></span><span> </span><span id="local-6989586621679495163"><span class="annot"><span class="annottext">enqueueOpName__field_descriptor :: FieldDescriptor QueueRunnerDef
|
|
</span><a href="#local-6989586621679495163"><span class="hs-identifier hs-var hs-var">enqueueOpName__field_descriptor</span></a></span></span><span>
|
|
</span><span id="line-137"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
|
-> FieldTypeDescriptor Text
|
|
-> FieldAccessor QueueRunnerDef Text
|
|
-> FieldDescriptor QueueRunnerDef
|
|
forall value msg.
|
|
String
|
|
-> FieldTypeDescriptor value
|
|
-> FieldAccessor msg value
|
|
-> FieldDescriptor msg
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.FieldDescriptor</span></span><span>
|
|
</span><span id="line-138"></span><span> </span><span class="annot"><span class="hs-string">"enqueue_op_name"</span></span><span>
|
|
</span><span id="line-139"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ScalarField Text -> FieldTypeDescriptor Text
|
|
forall value. ScalarField value -> FieldTypeDescriptor value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.ScalarField</span></span><span> </span><span class="annot"><span class="annottext">ScalarField Text
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.StringField</span></span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-140"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldTypeDescriptor</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-141"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Packing
|
|
-> Lens' QueueRunnerDef [Text] -> FieldAccessor QueueRunnerDef Text
|
|
forall msg value.
|
|
Packing -> Lens' msg [value] -> FieldAccessor msg value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.RepeatedField</span></span><span>
|
|
</span><span id="line-142"></span><span> </span><span class="annot"><span class="annottext">Packing
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Unpacked</span></span><span>
|
|
</span><span id="line-143"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"enqueueOpName"</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-144"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldDescriptor</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span>
|
|
</span><span id="line-145"></span><span> </span><span id="local-6989586621679495160"><span class="annot"><span class="annottext">closeOpName__field_descriptor :: FieldDescriptor QueueRunnerDef
|
|
</span><a href="#local-6989586621679495160"><span class="hs-identifier hs-var hs-var">closeOpName__field_descriptor</span></a></span></span><span>
|
|
</span><span id="line-146"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
|
-> FieldTypeDescriptor Text
|
|
-> FieldAccessor QueueRunnerDef Text
|
|
-> FieldDescriptor QueueRunnerDef
|
|
forall value msg.
|
|
String
|
|
-> FieldTypeDescriptor value
|
|
-> FieldAccessor msg value
|
|
-> FieldDescriptor msg
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.FieldDescriptor</span></span><span>
|
|
</span><span id="line-147"></span><span> </span><span class="annot"><span class="hs-string">"close_op_name"</span></span><span>
|
|
</span><span id="line-148"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ScalarField Text -> FieldTypeDescriptor Text
|
|
forall value. ScalarField value -> FieldTypeDescriptor value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.ScalarField</span></span><span> </span><span class="annot"><span class="annottext">ScalarField Text
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.StringField</span></span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-149"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldTypeDescriptor</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-150"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">WireDefault Text
|
|
-> Lens QueueRunnerDef QueueRunnerDef Text Text
|
|
-> FieldAccessor QueueRunnerDef Text
|
|
forall value msg.
|
|
WireDefault value -> Lens' msg value -> FieldAccessor msg value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.PlainField</span></span><span>
|
|
</span><span id="line-151"></span><span> </span><span class="annot"><span class="annottext">WireDefault Text
|
|
forall value. (FieldDefault value, Eq value) => WireDefault value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Optional</span></span><span>
|
|
</span><span id="line-152"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"closeOpName"</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-153"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldDescriptor</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span>
|
|
</span><span id="line-154"></span><span> </span><span id="local-6989586621679495159"><span class="annot"><span class="annottext">cancelOpName__field_descriptor :: FieldDescriptor QueueRunnerDef
|
|
</span><a href="#local-6989586621679495159"><span class="hs-identifier hs-var hs-var">cancelOpName__field_descriptor</span></a></span></span><span>
|
|
</span><span id="line-155"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
|
-> FieldTypeDescriptor Text
|
|
-> FieldAccessor QueueRunnerDef Text
|
|
-> FieldDescriptor QueueRunnerDef
|
|
forall value msg.
|
|
String
|
|
-> FieldTypeDescriptor value
|
|
-> FieldAccessor msg value
|
|
-> FieldDescriptor msg
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.FieldDescriptor</span></span><span>
|
|
</span><span id="line-156"></span><span> </span><span class="annot"><span class="hs-string">"cancel_op_name"</span></span><span>
|
|
</span><span id="line-157"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ScalarField Text -> FieldTypeDescriptor Text
|
|
forall value. ScalarField value -> FieldTypeDescriptor value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.ScalarField</span></span><span> </span><span class="annot"><span class="annottext">ScalarField Text
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.StringField</span></span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-158"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldTypeDescriptor</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-159"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">WireDefault Text
|
|
-> Lens QueueRunnerDef QueueRunnerDef Text Text
|
|
-> FieldAccessor QueueRunnerDef Text
|
|
forall value msg.
|
|
WireDefault value -> Lens' msg value -> FieldAccessor msg value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.PlainField</span></span><span>
|
|
</span><span id="line-160"></span><span> </span><span class="annot"><span class="annottext">WireDefault Text
|
|
forall value. (FieldDefault value, Eq value) => WireDefault value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Optional</span></span><span>
|
|
</span><span id="line-161"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"cancelOpName"</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-162"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldDescriptor</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span>
|
|
</span><span id="line-163"></span><span> </span><span id="local-6989586621679495158"><span class="annot"><span class="annottext">queueClosedExceptionTypes__field_descriptor :: FieldDescriptor QueueRunnerDef
|
|
</span><a href="#local-6989586621679495158"><span class="hs-identifier hs-var hs-var">queueClosedExceptionTypes__field_descriptor</span></a></span></span><span>
|
|
</span><span id="line-164"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
|
-> FieldTypeDescriptor Code
|
|
-> FieldAccessor QueueRunnerDef Code
|
|
-> FieldDescriptor QueueRunnerDef
|
|
forall value msg.
|
|
String
|
|
-> FieldTypeDescriptor value
|
|
-> FieldAccessor msg value
|
|
-> FieldDescriptor msg
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.FieldDescriptor</span></span><span>
|
|
</span><span id="line-165"></span><span> </span><span class="annot"><span class="hs-string">"queue_closed_exception_types"</span></span><span>
|
|
</span><span id="line-166"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ScalarField Code -> FieldTypeDescriptor Code
|
|
forall value. ScalarField value -> FieldTypeDescriptor value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.ScalarField</span></span><span> </span><span class="annot"><span class="annottext">ScalarField Code
|
|
forall t. MessageEnum t => ScalarField t
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.EnumField</span></span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-167"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldTypeDescriptor</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.ErrorCodes.html#Code"><span class="hs-identifier hs-type">Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-168"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Packing
|
|
-> Lens' QueueRunnerDef [Code] -> FieldAccessor QueueRunnerDef Code
|
|
forall msg value.
|
|
Packing -> Lens' msg [value] -> FieldAccessor msg value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.RepeatedField</span></span><span>
|
|
</span><span id="line-169"></span><span> </span><span class="annot"><span class="annottext">Packing
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Packed</span></span><span>
|
|
</span><span id="line-170"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"queueClosedExceptionTypes"</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-171"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.FieldDescriptor</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span>
|
|
</span><span id="line-172"></span><span> </span><span class="hs-keyword">in</span><span>
|
|
</span><span id="line-173"></span><span> </span><span class="annot"><span class="annottext">[(Tag, FieldDescriptor QueueRunnerDef)]
|
|
-> Map Tag (FieldDescriptor QueueRunnerDef)
|
|
forall k a. Ord k => [(k, a)] -> Map k a
|
|
</span><span class="hs-identifier hs-var">Data.Map.fromList</span></span><span>
|
|
</span><span id="line-174"></span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><span class="annottext">Int -> Tag
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Tag</span></span><span> </span><span class="annot"><span class="hs-number">1</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">FieldDescriptor QueueRunnerDef
|
|
</span><a href="#local-6989586621679495170"><span class="hs-identifier hs-var">queueName__field_descriptor</span></a></span><span class="hs-special">)</span><span class="hs-special">,</span><span>
|
|
</span><span id="line-175"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Int -> Tag
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Tag</span></span><span> </span><span class="annot"><span class="hs-number">2</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">FieldDescriptor QueueRunnerDef
|
|
</span><a href="#local-6989586621679495163"><span class="hs-identifier hs-var">enqueueOpName__field_descriptor</span></a></span><span class="hs-special">)</span><span class="hs-special">,</span><span>
|
|
</span><span id="line-176"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Int -> Tag
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Tag</span></span><span> </span><span class="annot"><span class="hs-number">3</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">FieldDescriptor QueueRunnerDef
|
|
</span><a href="#local-6989586621679495160"><span class="hs-identifier hs-var">closeOpName__field_descriptor</span></a></span><span class="hs-special">)</span><span class="hs-special">,</span><span>
|
|
</span><span id="line-177"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Int -> Tag
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Tag</span></span><span> </span><span class="annot"><span class="hs-number">4</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">FieldDescriptor QueueRunnerDef
|
|
</span><a href="#local-6989586621679495159"><span class="hs-identifier hs-var">cancelOpName__field_descriptor</span></a></span><span class="hs-special">)</span><span class="hs-special">,</span><span>
|
|
</span><span id="line-178"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Int -> Tag
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Tag</span></span><span> </span><span class="annot"><span class="hs-number">5</span></span><span class="hs-special">,</span><span> </span><span>
|
|
</span><span id="line-179"></span><span> </span><span class="annot"><span class="annottext">FieldDescriptor QueueRunnerDef
|
|
</span><a href="#local-6989586621679495158"><span class="hs-identifier hs-var">queueClosedExceptionTypes__field_descriptor</span></a></span><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
|
</span><span id="line-180"></span><span> </span><span id="local-6989586621679495153"><span class="annot"><span class="annottext">unknownFields :: LensLike' f QueueRunnerDef FieldSet
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">unknownFields</span></span></span><span>
|
|
</span><span id="line-181"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(QueueRunnerDef -> FieldSet)
|
|
-> (QueueRunnerDef -> FieldSet -> QueueRunnerDef)
|
|
-> Lens' QueueRunnerDef FieldSet
|
|
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.Unchecked.lens</span></span><span>
|
|
</span><span id="line-182"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef -> FieldSet
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27_unknownFields"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'_unknownFields</span></a></span><span>
|
|
</span><span id="line-183"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495151"><span class="annot"><span class="annottext">x__ :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495151"><span class="hs-identifier hs-var">x__</span></a></span></span><span> </span><span id="local-6989586621679495150"><span class="annot"><span class="annottext">y__ :: FieldSet
|
|
</span><a href="#local-6989586621679495150"><span class="hs-identifier hs-var">y__</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495151"><span class="hs-identifier hs-var">x__</span></a></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">_QueueRunnerDef'_unknownFields :: FieldSet
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27_unknownFields"><span class="hs-identifier hs-var">_QueueRunnerDef'_unknownFields</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">FieldSet
|
|
</span><a href="#local-6989586621679495150"><span class="hs-identifier hs-var">y__</span></a></span><span class="hs-special">}</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-184"></span><span> </span><span id="local-6989586621679495149"><span class="annot"><span class="annottext">defMessage :: QueueRunnerDef
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">defMessage</span></span></span><span>
|
|
</span><span id="line-185"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">$WQueueRunnerDef'_constructor :: Text
|
|
-> Vector Text
|
|
-> Text
|
|
-> Text
|
|
-> Vector Code
|
|
-> FieldSet
|
|
-> QueueRunnerDef
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#%24WQueueRunnerDef%27_constructor"><span class="hs-identifier hs-type hs-type">QueueRunnerDef'_constructor</span></a></span><span>
|
|
</span><span id="line-186"></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">_QueueRunnerDef'queueName :: Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueName"><span class="hs-identifier hs-var">_QueueRunnerDef'queueName</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text
|
|
forall value. FieldDefault value => value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.fieldDefault</span></span><span class="hs-special">,</span><span>
|
|
</span><span id="line-187"></span><span> </span><span class="annot"><span class="annottext">_QueueRunnerDef'enqueueOpName :: Vector Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27enqueueOpName"><span class="hs-identifier hs-var">_QueueRunnerDef'enqueueOpName</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Vector Text
|
|
forall (v :: * -> *) a. Vector v a => v a
|
|
</span><span class="hs-identifier hs-var">Data.Vector.Generic.empty</span></span><span class="hs-special">,</span><span>
|
|
</span><span id="line-188"></span><span> </span><span class="annot"><span class="annottext">_QueueRunnerDef'closeOpName :: Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27closeOpName"><span class="hs-identifier hs-var">_QueueRunnerDef'closeOpName</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text
|
|
forall value. FieldDefault value => value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.fieldDefault</span></span><span class="hs-special">,</span><span>
|
|
</span><span id="line-189"></span><span> </span><span class="annot"><span class="annottext">_QueueRunnerDef'cancelOpName :: Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27cancelOpName"><span class="hs-identifier hs-var">_QueueRunnerDef'cancelOpName</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text
|
|
forall value. FieldDefault value => value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.fieldDefault</span></span><span class="hs-special">,</span><span>
|
|
</span><span id="line-190"></span><span> </span><span class="annot"><span class="annottext">_QueueRunnerDef'queueClosedExceptionTypes :: Vector Code
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueClosedExceptionTypes"><span class="hs-identifier hs-var">_QueueRunnerDef'queueClosedExceptionTypes</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Vector Code
|
|
forall (v :: * -> *) a. Vector v a => v a
|
|
</span><span class="hs-identifier hs-var">Data.Vector.Generic.empty</span></span><span class="hs-special">,</span><span>
|
|
</span><span id="line-191"></span><span> </span><span class="annot"><span class="annottext">_QueueRunnerDef'_unknownFields :: FieldSet
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27_unknownFields"><span class="hs-identifier hs-var">_QueueRunnerDef'_unknownFields</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span class="hs-special">}</span><span>
|
|
</span><span id="line-192"></span><span> </span><span id="local-6989586621679495144"><span class="annot"><span class="annottext">parseMessage :: Parser QueueRunnerDef
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">parseMessage</span></span></span><span>
|
|
</span><span id="line-193"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">let</span><span>
|
|
</span><span id="line-194"></span><span> </span><span class="annot"><a href="#local-6989586621679495142"><span class="hs-identifier hs-type">loop</span></a></span><span> </span><span class="hs-glyph">::</span><span>
|
|
</span><span id="line-195"></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span>
|
|
</span><span id="line-196"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Encoding.Growing.Growing</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Vector.Vector</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Encoding.Growing.RealWorld</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Text.Text</span></span><span>
|
|
</span><span id="line-197"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Encoding.Growing.Growing</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.Vector.Vector</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Encoding.Growing.RealWorld</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.ErrorCodes.html#Code"><span class="hs-identifier hs-type">Proto.Tensorflow.Core.Protobuf.ErrorCodes.Code</span></a></span><span>
|
|
</span><span id="line-198"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ProtoLens.Encoding.Bytes.Parser</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span>
|
|
</span><span id="line-199"></span><span> </span><span id="local-6989586621679495142"><span class="annot"><span class="annottext">loop :: QueueRunnerDef
|
|
-> Growing Vector RealWorld Text
|
|
-> Growing Vector RealWorld Code
|
|
-> Parser QueueRunnerDef
|
|
</span><a href="#local-6989586621679495142"><span class="hs-identifier hs-var hs-var">loop</span></a></span></span><span> </span><span id="local-6989586621679495141"><span class="annot"><span class="annottext">x :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495141"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span id="local-6989586621679495140"><span class="annot"><span class="annottext">mutable'enqueueOpName :: Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495140"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span></span><span> </span><span id="local-6989586621679495139"><span class="annot"><span class="annottext">mutable'queueClosedExceptionTypes :: Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495139"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span></span><span>
|
|
</span><span id="line-200"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495138"><span class="annot"><span class="annottext">Bool
|
|
</span><a href="#local-6989586621679495138"><span class="hs-identifier hs-var">end</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Bool
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.atEnd</span></span><span>
|
|
</span><span id="line-201"></span><span> </span><span class="hs-keyword">if</span><span> </span><span class="annot"><span class="annottext">Bool
|
|
</span><a href="#local-6989586621679495138"><span class="hs-identifier hs-var">end</span></a></span><span> </span><span class="hs-keyword">then</span><span>
|
|
</span><span id="line-202"></span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495136"><span class="annot"><span class="annottext">Vector Text
|
|
</span><a href="#local-6989586621679495136"><span class="hs-identifier hs-var">frozen'enqueueOpName</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">IO (Vector Text) -> Parser (Vector Text)
|
|
forall a. IO a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO</span></span><span>
|
|
</span><span id="line-203"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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)
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Growing.unsafeFreeze</span></span><span>
|
|
</span><span id="line-204"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
Growing Vector (PrimState IO) Text
|
|
</span><a href="#local-6989586621679495140"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-205"></span><span> </span><span id="local-6989586621679495133"><span class="annot"><span class="annottext">Vector Code
|
|
</span><a href="#local-6989586621679495133"><span class="hs-identifier hs-var">frozen'queueClosedExceptionTypes</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">IO (Vector Code) -> Parser (Vector Code)
|
|
forall a. IO a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO</span></span><span>
|
|
</span><span id="line-206"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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)
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Growing.unsafeFreeze</span></span><span>
|
|
</span><span id="line-207"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
Growing Vector (PrimState IO) Code
|
|
</span><a href="#local-6989586621679495139"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-208"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">let</span><span> </span><span id="local-6989586621679495132"><span class="annot"><span class="annottext">missing :: [a]
|
|
</span><a href="#local-6989586621679495132"><span class="hs-identifier hs-var hs-var">missing</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
|
|
</span><span id="line-209"></span><span> </span><span class="hs-keyword">in</span><span>
|
|
</span><span id="line-210"></span><span> </span><span class="hs-keyword">if</span><span> </span><span class="annot"><span class="annottext">[Any] -> Bool
|
|
forall (t :: * -> *) a. Foldable t => t a -> Bool
|
|
</span><span class="hs-identifier hs-var">Prelude.null</span></span><span> </span><span class="annot"><span class="annottext">[Any]
|
|
forall a. [a]
|
|
</span><a href="#local-6989586621679495132"><span class="hs-identifier hs-var">missing</span></a></span><span> </span><span class="hs-keyword">then</span><span>
|
|
</span><span id="line-211"></span><span> </span><span class="annot"><span class="annottext">() -> Parser ()
|
|
forall (m :: * -> *) a. Monad m => a -> m a
|
|
</span><span class="hs-identifier hs-var">Prelude.return</span></span><span> </span><span class="hs-special">(</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-212"></span><span> </span><span class="hs-keyword">else</span><span>
|
|
</span><span id="line-213"></span><span> </span><span class="annot"><span class="annottext">String -> Parser ()
|
|
forall (m :: * -> *) a. MonadFail m => String -> m a
|
|
</span><span class="hs-identifier hs-var">Prelude.fail</span></span><span>
|
|
</span><span id="line-214"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -> ShowS
|
|
forall a. [a] -> [a] -> [a]
|
|
</span><span class="hs-operator hs-var">(Prelude.++)</span></span><span>
|
|
</span><span id="line-215"></span><span> </span><span class="annot"><span class="hs-string">"Missing required fields: "</span></span><span>
|
|
</span><span id="line-216"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">[String] -> String
|
|
forall a. Show a => a -> String
|
|
</span><span class="hs-identifier hs-var">Prelude.show</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">[String]
|
|
forall a. [a]
|
|
</span><a href="#local-6989586621679495132"><span class="hs-identifier hs-var">missing</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">Prelude.String</span></span><span class="hs-special">]</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-217"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef -> Parser QueueRunnerDef
|
|
forall (m :: * -> *) a. Monad m => a -> m a
|
|
</span><span class="hs-identifier hs-var">Prelude.return</span></span><span>
|
|
</span><span id="line-218"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Setter QueueRunnerDef QueueRunnerDef FieldSet FieldSet
|
|
-> (FieldSet -> FieldSet) -> QueueRunnerDef -> QueueRunnerDef
|
|
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.over</span></span><span>
|
|
</span><span id="line-219"></span><span> </span><span class="annot"><span class="annottext">forall msg. Message msg => Lens' msg FieldSet
|
|
Setter QueueRunnerDef QueueRunnerDef FieldSet FieldSet
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.unknownFields</span></span><span>
|
|
</span><span id="line-220"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span class="hs-glyph">!</span><span id="local-6989586621679495128"><span class="annot"><span class="annottext">FieldSet
|
|
</span><a href="#local-6989586621679495128"><span class="hs-identifier hs-var">t</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">FieldSet -> FieldSet
|
|
forall a. [a] -> [a]
|
|
</span><span class="hs-identifier hs-var">Prelude.reverse</span></span><span> </span><span class="annot"><span class="annottext">FieldSet
|
|
</span><a href="#local-6989586621679495128"><span class="hs-identifier hs-var">t</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-221"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Setter QueueRunnerDef QueueRunnerDef (Vector Text) (Vector Text)
|
|
-> Vector Text -> QueueRunnerDef -> QueueRunnerDef
|
|
forall s t a b. Setter s t a b -> b -> s -> t
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.set</span></span><span>
|
|
</span><span id="line-222"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"vec'enqueueOpName"</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-223"></span><span> </span><span class="annot"><span class="annottext">Vector Text
|
|
</span><a href="#local-6989586621679495136"><span class="hs-identifier hs-var">frozen'enqueueOpName</span></a></span><span>
|
|
</span><span id="line-224"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Setter QueueRunnerDef QueueRunnerDef (Vector Code) (Vector Code)
|
|
-> Vector Code -> QueueRunnerDef -> QueueRunnerDef
|
|
forall s t a b. Setter s t a b -> b -> s -> t
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.set</span></span><span>
|
|
</span><span id="line-225"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"vec'queueClosedExceptionTypes"</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-226"></span><span> </span><span class="annot"><span class="annottext">Vector Code
|
|
</span><a href="#local-6989586621679495133"><span class="hs-identifier hs-var">frozen'queueClosedExceptionTypes</span></a></span><span>
|
|
</span><span id="line-227"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495141"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-228"></span><span> </span><span class="hs-keyword">else</span><span>
|
|
</span><span id="line-229"></span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495125"><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495125"><span class="hs-identifier hs-var">tag</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Word64
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getVarInt</span></span><span>
|
|
</span><span id="line-230"></span><span> </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495125"><span class="hs-identifier hs-var">tag</span></a></span><span> </span><span class="hs-keyword">of</span><span>
|
|
</span><span id="line-231"></span><span> </span><span class="hs-number">10</span><span>
|
|
</span><span id="line-232"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495123"><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495123"><span class="hs-identifier hs-var">y</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Text -> String -> Parser Text
|
|
forall a. Parser a -> String -> Parser a
|
|
</span><span class="hs-operator hs-var">(Data.ProtoLens.Encoding.Bytes.<?>)</span></span><span>
|
|
</span><span id="line-233"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495121"><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495121"><span class="hs-identifier hs-var">value</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495120"><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495120"><span class="hs-identifier hs-var">len</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Word64
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getVarInt</span></span><span>
|
|
</span><span id="line-234"></span><span> </span><span class="annot"><span class="annottext">Int -> Parser ByteString
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getBytes</span></span><span>
|
|
</span><span id="line-235"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Int
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span> </span><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495120"><span class="hs-identifier hs-var">len</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-236"></span><span> </span><span class="annot"><span class="annottext">Either String Text -> Parser Text
|
|
forall a. Either String a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.runEither</span></span><span>
|
|
</span><span id="line-237"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">ByteString -> Either UnicodeException Text
|
|
</span><span class="hs-identifier hs-var">Data.Text.Encoding.decodeUtf8'</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495121"><span class="hs-identifier hs-var">value</span></a></span><span> </span><span class="hs-keyword">of</span><span>
|
|
</span><span id="line-238"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Prelude.Left</span></span><span> </span><span id="local-6989586621679495116"><span class="annot"><span class="annottext">err :: UnicodeException
|
|
</span><a href="#local-6989586621679495116"><span class="hs-identifier hs-var">err</span></a></span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-239"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">String -> Either String Text
|
|
forall a b. a -> Either a b
|
|
</span><span class="hs-identifier hs-var">Prelude.Left</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">UnicodeException -> String
|
|
forall a. Show a => a -> String
|
|
</span><span class="hs-identifier hs-var">Prelude.show</span></span><span> </span><span class="annot"><span class="annottext">UnicodeException
|
|
</span><a href="#local-6989586621679495116"><span class="hs-identifier hs-var">err</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-240"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Prelude.Right</span></span><span> </span><span id="local-6989586621679495115"><span class="annot"><span class="annottext">r :: Text
|
|
</span><a href="#local-6989586621679495115"><span class="hs-identifier hs-var">r</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Text -> Either String Text
|
|
forall a b. b -> Either a b
|
|
</span><span class="hs-identifier hs-var">Prelude.Right</span></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495115"><span class="hs-identifier hs-var">r</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-241"></span><span> </span><span class="annot"><span class="hs-string">"queue_name"</span></span><span>
|
|
</span><span id="line-242"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
-> Growing Vector RealWorld Text
|
|
-> Growing Vector RealWorld Code
|
|
-> Parser QueueRunnerDef
|
|
</span><a href="#local-6989586621679495142"><span class="hs-identifier hs-var">loop</span></a></span><span>
|
|
</span><span id="line-243"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Setter QueueRunnerDef QueueRunnerDef Text Text
|
|
-> Text -> QueueRunnerDef -> QueueRunnerDef
|
|
forall s t a b. Setter s t a b -> b -> s -> t
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.set</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"queueName"</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495123"><span class="hs-identifier hs-var">y</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495141"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-244"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495140"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span><span>
|
|
</span><span id="line-245"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495139"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span><span>
|
|
</span><span id="line-246"></span><span> </span><span class="hs-number">18</span><span>
|
|
</span><span id="line-247"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span> </span><span class="hs-glyph">!</span><span id="local-6989586621679495114"><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495114"><span class="hs-identifier hs-var">y</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Text -> String -> Parser Text
|
|
forall a. Parser a -> String -> Parser a
|
|
</span><span class="hs-operator hs-var">(Data.ProtoLens.Encoding.Bytes.<?>)</span></span><span>
|
|
</span><span id="line-248"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495113"><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495113"><span class="hs-identifier hs-var">value</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495112"><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495112"><span class="hs-identifier hs-var">len</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Word64
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getVarInt</span></span><span>
|
|
</span><span id="line-249"></span><span> </span><span class="annot"><span class="annottext">Int -> Parser ByteString
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getBytes</span></span><span>
|
|
</span><span id="line-250"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Int
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span> </span><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495112"><span class="hs-identifier hs-var">len</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-251"></span><span> </span><span class="annot"><span class="annottext">Either String Text -> Parser Text
|
|
forall a. Either String a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.runEither</span></span><span>
|
|
</span><span id="line-252"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">ByteString -> Either UnicodeException Text
|
|
</span><span class="hs-identifier hs-var">Data.Text.Encoding.decodeUtf8'</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495113"><span class="hs-identifier hs-var">value</span></a></span><span> </span><span class="hs-keyword">of</span><span>
|
|
</span><span id="line-253"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Prelude.Left</span></span><span> </span><span id="local-6989586621679495111"><span class="annot"><span class="annottext">err :: UnicodeException
|
|
</span><a href="#local-6989586621679495111"><span class="hs-identifier hs-var">err</span></a></span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-254"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">String -> Either String Text
|
|
forall a b. a -> Either a b
|
|
</span><span class="hs-identifier hs-var">Prelude.Left</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">UnicodeException -> String
|
|
forall a. Show a => a -> String
|
|
</span><span class="hs-identifier hs-var">Prelude.show</span></span><span> </span><span class="annot"><span class="annottext">UnicodeException
|
|
</span><a href="#local-6989586621679495111"><span class="hs-identifier hs-var">err</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-255"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Prelude.Right</span></span><span> </span><span id="local-6989586621679495110"><span class="annot"><span class="annottext">r :: Text
|
|
</span><a href="#local-6989586621679495110"><span class="hs-identifier hs-var">r</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Text -> Either String Text
|
|
forall a b. b -> Either a b
|
|
</span><span class="hs-identifier hs-var">Prelude.Right</span></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495110"><span class="hs-identifier hs-var">r</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-256"></span><span> </span><span class="annot"><span class="hs-string">"enqueue_op_name"</span></span><span>
|
|
</span><span id="line-257"></span><span> </span><span id="local-6989586621679495109"><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495109"><span class="hs-identifier hs-var">v</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">IO (Growing Vector RealWorld Text)
|
|
-> Parser (Growing Vector RealWorld Text)
|
|
forall a. IO a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO</span></span><span>
|
|
</span><span id="line-258"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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)
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Growing.append</span></span><span>
|
|
</span><span id="line-259"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
Growing Vector (PrimState IO) Text
|
|
</span><a href="#local-6989586621679495140"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495114"><span class="hs-identifier hs-var">y</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-260"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
-> Growing Vector RealWorld Text
|
|
-> Growing Vector RealWorld Code
|
|
-> Parser QueueRunnerDef
|
|
</span><a href="#local-6989586621679495142"><span class="hs-identifier hs-var">loop</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495141"><span class="hs-identifier hs-var">x</span></a></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495109"><span class="hs-identifier hs-var">v</span></a></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495139"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span><span>
|
|
</span><span id="line-261"></span><span> </span><span class="hs-number">26</span><span>
|
|
</span><span id="line-262"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495107"><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495107"><span class="hs-identifier hs-var">y</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Text -> String -> Parser Text
|
|
forall a. Parser a -> String -> Parser a
|
|
</span><span class="hs-operator hs-var">(Data.ProtoLens.Encoding.Bytes.<?>)</span></span><span>
|
|
</span><span id="line-263"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495106"><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495106"><span class="hs-identifier hs-var">value</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495105"><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495105"><span class="hs-identifier hs-var">len</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Word64
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getVarInt</span></span><span>
|
|
</span><span id="line-264"></span><span> </span><span class="annot"><span class="annottext">Int -> Parser ByteString
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getBytes</span></span><span>
|
|
</span><span id="line-265"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Int
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span> </span><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495105"><span class="hs-identifier hs-var">len</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-266"></span><span> </span><span class="annot"><span class="annottext">Either String Text -> Parser Text
|
|
forall a. Either String a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.runEither</span></span><span>
|
|
</span><span id="line-267"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">ByteString -> Either UnicodeException Text
|
|
</span><span class="hs-identifier hs-var">Data.Text.Encoding.decodeUtf8'</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495106"><span class="hs-identifier hs-var">value</span></a></span><span> </span><span class="hs-keyword">of</span><span>
|
|
</span><span id="line-268"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Prelude.Left</span></span><span> </span><span id="local-6989586621679495104"><span class="annot"><span class="annottext">err :: UnicodeException
|
|
</span><a href="#local-6989586621679495104"><span class="hs-identifier hs-var">err</span></a></span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-269"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">String -> Either String Text
|
|
forall a b. a -> Either a b
|
|
</span><span class="hs-identifier hs-var">Prelude.Left</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">UnicodeException -> String
|
|
forall a. Show a => a -> String
|
|
</span><span class="hs-identifier hs-var">Prelude.show</span></span><span> </span><span class="annot"><span class="annottext">UnicodeException
|
|
</span><a href="#local-6989586621679495104"><span class="hs-identifier hs-var">err</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-270"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Prelude.Right</span></span><span> </span><span id="local-6989586621679495103"><span class="annot"><span class="annottext">r :: Text
|
|
</span><a href="#local-6989586621679495103"><span class="hs-identifier hs-var">r</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Text -> Either String Text
|
|
forall a b. b -> Either a b
|
|
</span><span class="hs-identifier hs-var">Prelude.Right</span></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495103"><span class="hs-identifier hs-var">r</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-271"></span><span> </span><span class="annot"><span class="hs-string">"close_op_name"</span></span><span>
|
|
</span><span id="line-272"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
-> Growing Vector RealWorld Text
|
|
-> Growing Vector RealWorld Code
|
|
-> Parser QueueRunnerDef
|
|
</span><a href="#local-6989586621679495142"><span class="hs-identifier hs-var">loop</span></a></span><span>
|
|
</span><span id="line-273"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Setter QueueRunnerDef QueueRunnerDef Text Text
|
|
-> Text -> QueueRunnerDef -> QueueRunnerDef
|
|
forall s t a b. Setter s t a b -> b -> s -> t
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.set</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"closeOpName"</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495107"><span class="hs-identifier hs-var">y</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495141"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-274"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495140"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span><span>
|
|
</span><span id="line-275"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495139"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span><span>
|
|
</span><span id="line-276"></span><span> </span><span class="hs-number">34</span><span>
|
|
</span><span id="line-277"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495102"><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495102"><span class="hs-identifier hs-var">y</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Text -> String -> Parser Text
|
|
forall a. Parser a -> String -> Parser a
|
|
</span><span class="hs-operator hs-var">(Data.ProtoLens.Encoding.Bytes.<?>)</span></span><span>
|
|
</span><span id="line-278"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495101"><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495101"><span class="hs-identifier hs-var">value</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495100"><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495100"><span class="hs-identifier hs-var">len</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Word64
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getVarInt</span></span><span>
|
|
</span><span id="line-279"></span><span> </span><span class="annot"><span class="annottext">Int -> Parser ByteString
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getBytes</span></span><span>
|
|
</span><span id="line-280"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Int
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span> </span><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495100"><span class="hs-identifier hs-var">len</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-281"></span><span> </span><span class="annot"><span class="annottext">Either String Text -> Parser Text
|
|
forall a. Either String a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.runEither</span></span><span>
|
|
</span><span id="line-282"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">ByteString -> Either UnicodeException Text
|
|
</span><span class="hs-identifier hs-var">Data.Text.Encoding.decodeUtf8'</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495101"><span class="hs-identifier hs-var">value</span></a></span><span> </span><span class="hs-keyword">of</span><span>
|
|
</span><span id="line-283"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Prelude.Left</span></span><span> </span><span id="local-6989586621679495099"><span class="annot"><span class="annottext">err :: UnicodeException
|
|
</span><a href="#local-6989586621679495099"><span class="hs-identifier hs-var">err</span></a></span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-284"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">String -> Either String Text
|
|
forall a b. a -> Either a b
|
|
</span><span class="hs-identifier hs-var">Prelude.Left</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">UnicodeException -> String
|
|
forall a. Show a => a -> String
|
|
</span><span class="hs-identifier hs-var">Prelude.show</span></span><span> </span><span class="annot"><span class="annottext">UnicodeException
|
|
</span><a href="#local-6989586621679495099"><span class="hs-identifier hs-var">err</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-285"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Prelude.Right</span></span><span> </span><span id="local-6989586621679495098"><span class="annot"><span class="annottext">r :: Text
|
|
</span><a href="#local-6989586621679495098"><span class="hs-identifier hs-var">r</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Text -> Either String Text
|
|
forall a b. b -> Either a b
|
|
</span><span class="hs-identifier hs-var">Prelude.Right</span></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495098"><span class="hs-identifier hs-var">r</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-286"></span><span> </span><span class="annot"><span class="hs-string">"cancel_op_name"</span></span><span>
|
|
</span><span id="line-287"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
-> Growing Vector RealWorld Text
|
|
-> Growing Vector RealWorld Code
|
|
-> Parser QueueRunnerDef
|
|
</span><a href="#local-6989586621679495142"><span class="hs-identifier hs-var">loop</span></a></span><span>
|
|
</span><span id="line-288"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Setter QueueRunnerDef QueueRunnerDef Text Text
|
|
-> Text -> QueueRunnerDef -> QueueRunnerDef
|
|
forall s t a b. Setter s t a b -> b -> s -> t
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.set</span></span><span>
|
|
</span><span id="line-289"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"cancelOpName"</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495102"><span class="hs-identifier hs-var">y</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495141"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-290"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495140"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span><span>
|
|
</span><span id="line-291"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495139"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span><span>
|
|
</span><span id="line-292"></span><span> </span><span class="hs-number">40</span><span>
|
|
</span><span id="line-293"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span> </span><span class="hs-glyph">!</span><span id="local-6989586621679495097"><span class="annot"><span class="annottext">Code
|
|
</span><a href="#local-6989586621679495097"><span class="hs-identifier hs-var">y</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Code -> String -> Parser Code
|
|
forall a. Parser a -> String -> Parser a
|
|
</span><span class="hs-operator hs-var">(Data.ProtoLens.Encoding.Bytes.<?>)</span></span><span>
|
|
</span><span id="line-294"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Int -> Code) -> Parser Int -> Parser Code
|
|
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
|
|
</span><span class="hs-identifier hs-var">Prelude.fmap</span></span><span>
|
|
</span><span id="line-295"></span><span> </span><span class="annot"><span class="annottext">Int -> Code
|
|
forall a. Enum a => Int -> a
|
|
</span><span class="hs-identifier hs-var">Prelude.toEnum</span></span><span>
|
|
</span><span id="line-296"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Word64 -> Int) -> Parser Word64 -> Parser Int
|
|
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
|
|
</span><span class="hs-identifier hs-var">Prelude.fmap</span></span><span>
|
|
</span><span id="line-297"></span><span> </span><span class="annot"><span class="annottext">Word64 -> Int
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span>
|
|
</span><span id="line-298"></span><span> </span><span class="annot"><span class="annottext">Parser Word64
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getVarInt</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-299"></span><span> </span><span class="annot"><span class="hs-string">"queue_closed_exception_types"</span></span><span>
|
|
</span><span id="line-300"></span><span> </span><span id="local-6989586621679495095"><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495095"><span class="hs-identifier hs-var">v</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">IO (Growing Vector RealWorld Code)
|
|
-> Parser (Growing Vector RealWorld Code)
|
|
forall a. IO a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO</span></span><span>
|
|
</span><span id="line-301"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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)
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Growing.append</span></span><span>
|
|
</span><span id="line-302"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
Growing Vector (PrimState IO) Code
|
|
</span><a href="#local-6989586621679495139"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span><span> </span><span class="annot"><span class="annottext">Code
|
|
</span><a href="#local-6989586621679495097"><span class="hs-identifier hs-var">y</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-303"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
-> Growing Vector RealWorld Text
|
|
-> Growing Vector RealWorld Code
|
|
-> Parser QueueRunnerDef
|
|
</span><a href="#local-6989586621679495142"><span class="hs-identifier hs-var">loop</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495141"><span class="hs-identifier hs-var">x</span></a></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495140"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495095"><span class="hs-identifier hs-var">v</span></a></span><span>
|
|
</span><span id="line-304"></span><span> </span><span class="hs-number">42</span><span>
|
|
</span><span id="line-305"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495094"><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495094"><span class="hs-identifier hs-var">y</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495093"><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495093"><span class="hs-identifier hs-var">len</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Word64
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getVarInt</span></span><span>
|
|
</span><span id="line-306"></span><span> </span><span class="annot"><span class="annottext">Int
|
|
-> Parser (Growing Vector RealWorld Code)
|
|
-> Parser (Growing Vector RealWorld Code)
|
|
forall a. Int -> Parser a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.isolate</span></span><span>
|
|
</span><span id="line-307"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Int
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span> </span><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495093"><span class="hs-identifier hs-var">len</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-308"></span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-keyword">let</span><span>
|
|
</span><span id="line-309"></span><span> </span><span id="local-6989586621679495091"><span class="annot"><span class="annottext">ploop :: Growing v RealWorld a -> Parser (Growing v RealWorld a)
|
|
</span><a href="#local-6989586621679495091"><span class="hs-identifier hs-var hs-var">ploop</span></a></span></span><span> </span><span id="local-6989586621679495090"><span class="annot"><span class="annottext">qs :: Growing v RealWorld a
|
|
</span><a href="#local-6989586621679495090"><span class="hs-identifier hs-var">qs</span></a></span></span><span>
|
|
</span><span id="line-310"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495089"><span class="annot"><span class="annottext">Bool
|
|
</span><a href="#local-6989586621679495089"><span class="hs-identifier hs-var">packedEnd</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser Bool
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.atEnd</span></span><span>
|
|
</span><span id="line-311"></span><span> </span><span class="hs-keyword">if</span><span> </span><span class="annot"><span class="annottext">Bool
|
|
</span><a href="#local-6989586621679495089"><span class="hs-identifier hs-var">packedEnd</span></a></span><span> </span><span class="hs-keyword">then</span><span>
|
|
</span><span id="line-312"></span><span> </span><span class="annot"><span class="annottext">Growing v RealWorld a -> Parser (Growing v RealWorld a)
|
|
forall (m :: * -> *) a. Monad m => a -> m a
|
|
</span><span class="hs-identifier hs-var">Prelude.return</span></span><span> </span><span class="annot"><span class="annottext">Growing v RealWorld a
|
|
</span><a href="#local-6989586621679495090"><span class="hs-identifier hs-var">qs</span></a></span><span>
|
|
</span><span id="line-313"></span><span> </span><span class="hs-keyword">else</span><span>
|
|
</span><span id="line-314"></span><span> </span><span class="hs-keyword">do</span><span> </span><span class="hs-glyph">!</span><span id="local-6989586621679495088"><span class="annot"><span class="annottext">a
|
|
</span><a href="#local-6989586621679495088"><span class="hs-identifier hs-var">q</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Parser a -> String -> Parser a
|
|
forall a. Parser a -> String -> Parser a
|
|
</span><span class="hs-operator hs-var">(Data.ProtoLens.Encoding.Bytes.<?>)</span></span><span>
|
|
</span><span id="line-315"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Int -> a) -> Parser Int -> Parser a
|
|
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
|
|
</span><span class="hs-identifier hs-var">Prelude.fmap</span></span><span>
|
|
</span><span id="line-316"></span><span> </span><span class="annot"><span class="annottext">Int -> a
|
|
forall a. Enum a => Int -> a
|
|
</span><span class="hs-identifier hs-var">Prelude.toEnum</span></span><span>
|
|
</span><span id="line-317"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Word64 -> Int) -> Parser Word64 -> Parser Int
|
|
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
|
|
</span><span class="hs-identifier hs-var">Prelude.fmap</span></span><span>
|
|
</span><span id="line-318"></span><span> </span><span class="annot"><span class="annottext">Word64 -> Int
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span>
|
|
</span><span id="line-319"></span><span> </span><span class="annot"><span class="annottext">Parser Word64
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.getVarInt</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-320"></span><span> </span><span class="annot"><span class="hs-string">"queue_closed_exception_types"</span></span><span>
|
|
</span><span id="line-321"></span><span> </span><span id="local-6989586621679495087"><span class="annot"><span class="annottext">Growing v RealWorld a
|
|
</span><a href="#local-6989586621679495087"><span class="hs-identifier hs-var">qs'</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">IO (Growing v RealWorld a) -> Parser (Growing v RealWorld a)
|
|
forall a. IO a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO</span></span><span>
|
|
</span><span id="line-322"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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)
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Growing.append</span></span><span>
|
|
</span><span id="line-323"></span><span> </span><span class="annot"><span class="annottext">Growing v RealWorld a
|
|
Growing v (PrimState IO) a
|
|
</span><a href="#local-6989586621679495090"><span class="hs-identifier hs-var">qs</span></a></span><span> </span><span class="annot"><span class="annottext">a
|
|
</span><a href="#local-6989586621679495088"><span class="hs-identifier hs-var">q</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-324"></span><span> </span><span class="annot"><span class="annottext">Growing v RealWorld a -> Parser (Growing v RealWorld a)
|
|
</span><a href="#local-6989586621679495091"><span class="hs-identifier hs-var">ploop</span></a></span><span> </span><span class="annot"><span class="annottext">Growing v RealWorld a
|
|
</span><a href="#local-6989586621679495087"><span class="hs-identifier hs-var">qs'</span></a></span><span>
|
|
</span><span id="line-325"></span><span> </span><span class="hs-keyword">in</span><span> </span><span class="annot"><span class="annottext">forall a (v :: * -> *).
|
|
(Enum a, Vector v a) =>
|
|
Growing v RealWorld a -> Parser (Growing v RealWorld a)
|
|
</span><a href="#local-6989586621679495091"><span class="hs-identifier hs-var">ploop</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-326"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495139"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-327"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
-> Growing Vector RealWorld Text
|
|
-> Growing Vector RealWorld Code
|
|
-> Parser QueueRunnerDef
|
|
</span><a href="#local-6989586621679495142"><span class="hs-identifier hs-var">loop</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495141"><span class="hs-identifier hs-var">x</span></a></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495140"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495094"><span class="hs-identifier hs-var">y</span></a></span><span>
|
|
</span><span id="line-328"></span><span> </span><span id="local-6989586621679495086"><span class="annot"><span class="annottext">wire :: Word64
|
|
</span><a href="#local-6989586621679495086"><span class="hs-identifier hs-var">wire</span></a></span></span><span>
|
|
</span><span id="line-329"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span> </span><span class="hs-glyph">!</span><span id="local-6989586621679495085"><span class="annot"><span class="annottext">TaggedValue
|
|
</span><a href="#local-6989586621679495085"><span class="hs-identifier hs-var">y</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">Word64 -> Parser TaggedValue
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire</span></span><span>
|
|
</span><span id="line-330"></span><span> </span><span class="annot"><span class="annottext">Word64
|
|
</span><a href="#local-6989586621679495086"><span class="hs-identifier hs-var">wire</span></a></span><span>
|
|
</span><span id="line-331"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
-> Growing Vector RealWorld Text
|
|
-> Growing Vector RealWorld Code
|
|
-> Parser QueueRunnerDef
|
|
</span><a href="#local-6989586621679495142"><span class="hs-identifier hs-var">loop</span></a></span><span>
|
|
</span><span id="line-332"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Setter QueueRunnerDef QueueRunnerDef FieldSet FieldSet
|
|
-> (FieldSet -> FieldSet) -> QueueRunnerDef -> QueueRunnerDef
|
|
forall s t a b. Setter s t a b -> (a -> b) -> s -> t
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.over</span></span><span>
|
|
</span><span id="line-333"></span><span> </span><span class="annot"><span class="annottext">forall msg. Message msg => Lens' msg FieldSet
|
|
Setter QueueRunnerDef QueueRunnerDef FieldSet FieldSet
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.unknownFields</span></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span class="hs-glyph">!</span><span id="local-6989586621679495083"><span class="annot"><span class="annottext">FieldSet
|
|
</span><a href="#local-6989586621679495083"><span class="hs-identifier hs-var">t</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">:</span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">TaggedValue
|
|
</span><a href="#local-6989586621679495085"><span class="hs-identifier hs-var">y</span></a></span><span> </span><span class="annot"><span class="annottext">FieldSet
|
|
</span><a href="#local-6989586621679495083"><span class="hs-identifier hs-var">t</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495141"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-334"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495140"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span><span>
|
|
</span><span id="line-335"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495139"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span><span>
|
|
</span><span id="line-336"></span><span> </span><span class="hs-keyword">in</span><span>
|
|
</span><span id="line-337"></span><span> </span><span class="annot"><span class="annottext">Parser QueueRunnerDef -> String -> Parser QueueRunnerDef
|
|
forall a. Parser a -> String -> Parser a
|
|
</span><span class="hs-operator hs-var">(Data.ProtoLens.Encoding.Bytes.<?>)</span></span><span>
|
|
</span><span id="line-338"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">do</span><span> </span><span id="local-6989586621679495082"><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495082"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">IO (Growing Vector RealWorld Text)
|
|
-> Parser (Growing Vector RealWorld Text)
|
|
forall a. IO a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO</span></span><span>
|
|
</span><span id="line-339"></span><span> </span><span class="annot"><span class="annottext">IO (Growing Vector RealWorld Text)
|
|
forall (m :: * -> *) (v :: * -> *) a.
|
|
(PrimMonad m, Vector v a) =>
|
|
m (Growing v (PrimState m) a)
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Growing.new</span></span><span>
|
|
</span><span id="line-340"></span><span> </span><span id="local-6989586621679495080"><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495080"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">IO (Growing Vector RealWorld Code)
|
|
-> Parser (Growing Vector RealWorld Code)
|
|
forall a. IO a -> Parser a
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO</span></span><span>
|
|
</span><span id="line-341"></span><span> </span><span class="annot"><span class="annottext">IO (Growing Vector RealWorld Code)
|
|
forall (m :: * -> *) (v :: * -> *) a.
|
|
(PrimMonad m, Vector v a) =>
|
|
m (Growing v (PrimState m) a)
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Growing.new</span></span><span>
|
|
</span><span id="line-342"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
-> Growing Vector RealWorld Text
|
|
-> Growing Vector RealWorld Code
|
|
-> Parser QueueRunnerDef
|
|
</span><a href="#local-6989586621679495142"><span class="hs-identifier hs-var">loop</span></a></span><span>
|
|
</span><span id="line-343"></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
forall msg. Message msg => msg
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.defMessage</span></span><span>
|
|
</span><span id="line-344"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Text
|
|
</span><a href="#local-6989586621679495082"><span class="hs-identifier hs-var">mutable'enqueueOpName</span></a></span><span>
|
|
</span><span id="line-345"></span><span> </span><span class="annot"><span class="annottext">Growing Vector RealWorld Code
|
|
</span><a href="#local-6989586621679495080"><span class="hs-identifier hs-var">mutable'queueClosedExceptionTypes</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-346"></span><span> </span><span class="annot"><span class="hs-string">"QueueRunnerDef"</span></span><span>
|
|
</span><span id="line-347"></span><span> </span><span id="local-6989586621679495079"><span class="annot"><span class="annottext">buildMessage :: QueueRunnerDef -> Builder
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">buildMessage</span></span></span><span>
|
|
</span><span id="line-348"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495077"><span class="annot"><span class="annottext">_x :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495077"><span class="hs-identifier hs-var">_x</span></a></span></span><span>
|
|
</span><span id="line-349"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-350"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">let</span><span>
|
|
</span><span id="line-351"></span><span> </span><span id="local-6989586621679495076"><span class="annot"><span class="annottext">_v :: Text
|
|
</span><a href="#local-6989586621679495076"><span class="hs-identifier hs-var hs-var">_v</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">FoldLike Text QueueRunnerDef QueueRunnerDef Text Text
|
|
-> QueueRunnerDef -> Text
|
|
forall a s t b. FoldLike a s t a b -> s -> a
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.view</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"queueName"</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495077"><span class="hs-identifier hs-var">_x</span></a></span><span>
|
|
</span><span id="line-352"></span><span> </span><span class="hs-keyword">in</span><span>
|
|
</span><span id="line-353"></span><span> </span><span class="hs-keyword">if</span><span> </span><span class="annot"><span class="annottext">Text -> Text -> Bool
|
|
forall a. Eq a => a -> a -> Bool
|
|
</span><span class="hs-operator hs-var">(Prelude.==)</span></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495076"><span class="hs-identifier hs-var">_v</span></a></span><span> </span><span class="annot"><span class="annottext">Text
|
|
forall value. FieldDefault value => value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.fieldDefault</span></span><span> </span><span class="hs-keyword">then</span><span>
|
|
</span><span id="line-354"></span><span> </span><span class="annot"><span class="annottext">Builder
|
|
forall a. Monoid a => a
|
|
</span><span class="hs-identifier hs-var">Data.Monoid.mempty</span></span><span>
|
|
</span><span id="line-355"></span><span> </span><span class="hs-keyword">else</span><span>
|
|
</span><span id="line-356"></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-357"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span> </span><span class="annot"><span class="hs-number">10</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-358"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
|
|
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-359"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495073"><span class="annot"><span class="annottext">bs :: ByteString
|
|
</span><a href="#local-6989586621679495073"><span class="hs-identifier hs-var">bs</span></a></span></span><span>
|
|
</span><span id="line-360"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-361"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span>
|
|
</span><span id="line-362"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Int -> Word64
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -> Int
|
|
</span><span class="hs-identifier hs-var">Data.ByteString.length</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495073"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-363"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putBytes</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495073"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-364"></span><span> </span><span class="annot"><span class="annottext">Text -> ByteString
|
|
</span><span class="hs-identifier hs-var">Data.Text.Encoding.encodeUtf8</span></span><span>
|
|
</span><span id="line-365"></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495076"><span class="hs-identifier hs-var">_v</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-366"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-367"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Text -> Builder) -> Vector Text -> Builder
|
|
forall (v :: * -> *) a.
|
|
Vector v a =>
|
|
(a -> Builder) -> v a -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.foldMapBuilder</span></span><span>
|
|
</span><span id="line-368"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495068"><span class="annot"><span class="annottext">_v :: Text
|
|
</span><a href="#local-6989586621679495068"><span class="hs-identifier hs-var">_v</span></a></span></span><span>
|
|
</span><span id="line-369"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-370"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span> </span><span class="annot"><span class="hs-number">18</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-371"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
|
|
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-372"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495067"><span class="annot"><span class="annottext">bs :: ByteString
|
|
</span><a href="#local-6989586621679495067"><span class="hs-identifier hs-var">bs</span></a></span></span><span>
|
|
</span><span id="line-373"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-374"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span>
|
|
</span><span id="line-375"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Int -> Word64
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -> Int
|
|
</span><span class="hs-identifier hs-var">Data.ByteString.length</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495067"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-376"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putBytes</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495067"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-377"></span><span> </span><span class="annot"><span class="annottext">Text -> ByteString
|
|
</span><span class="hs-identifier hs-var">Data.Text.Encoding.encodeUtf8</span></span><span>
|
|
</span><span id="line-378"></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495068"><span class="hs-identifier hs-var">_v</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-379"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.view</span></span><span>
|
|
</span><span id="line-380"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"vec'enqueueOpName"</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495077"><span class="hs-identifier hs-var">_x</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-381"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-382"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">let</span><span>
|
|
</span><span id="line-383"></span><span> </span><span id="local-6989586621679495066"><span class="annot"><span class="annottext">_v :: Text
|
|
</span><a href="#local-6989586621679495066"><span class="hs-identifier hs-var hs-var">_v</span></a></span></span><span>
|
|
</span><span id="line-384"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">FoldLike Text QueueRunnerDef QueueRunnerDef Text Text
|
|
-> QueueRunnerDef -> Text
|
|
forall a s t b. FoldLike a s t a b -> s -> a
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.view</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"closeOpName"</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495077"><span class="hs-identifier hs-var">_x</span></a></span><span>
|
|
</span><span id="line-385"></span><span> </span><span class="hs-keyword">in</span><span>
|
|
</span><span id="line-386"></span><span> </span><span class="hs-keyword">if</span><span> </span><span class="annot"><span class="annottext">Text -> Text -> Bool
|
|
forall a. Eq a => a -> a -> Bool
|
|
</span><span class="hs-operator hs-var">(Prelude.==)</span></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495066"><span class="hs-identifier hs-var">_v</span></a></span><span> </span><span class="annot"><span class="annottext">Text
|
|
forall value. FieldDefault value => value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.fieldDefault</span></span><span> </span><span class="hs-keyword">then</span><span>
|
|
</span><span id="line-387"></span><span> </span><span class="annot"><span class="annottext">Builder
|
|
forall a. Monoid a => a
|
|
</span><span class="hs-identifier hs-var">Data.Monoid.mempty</span></span><span>
|
|
</span><span id="line-388"></span><span> </span><span class="hs-keyword">else</span><span>
|
|
</span><span id="line-389"></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-390"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span> </span><span class="annot"><span class="hs-number">26</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-391"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
|
|
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-392"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495065"><span class="annot"><span class="annottext">bs :: ByteString
|
|
</span><a href="#local-6989586621679495065"><span class="hs-identifier hs-var">bs</span></a></span></span><span>
|
|
</span><span id="line-393"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-394"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span>
|
|
</span><span id="line-395"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Int -> Word64
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -> Int
|
|
</span><span class="hs-identifier hs-var">Data.ByteString.length</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495065"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-396"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putBytes</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495065"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-397"></span><span> </span><span class="annot"><span class="annottext">Text -> ByteString
|
|
</span><span class="hs-identifier hs-var">Data.Text.Encoding.encodeUtf8</span></span><span>
|
|
</span><span id="line-398"></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495066"><span class="hs-identifier hs-var">_v</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-399"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-400"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">let</span><span>
|
|
</span><span id="line-401"></span><span> </span><span id="local-6989586621679495064"><span class="annot"><span class="annottext">_v :: Text
|
|
</span><a href="#local-6989586621679495064"><span class="hs-identifier hs-var hs-var">_v</span></a></span></span><span>
|
|
</span><span id="line-402"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">FoldLike Text QueueRunnerDef QueueRunnerDef Text Text
|
|
-> QueueRunnerDef -> Text
|
|
forall a s t b. FoldLike a s t a b -> s -> a
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.view</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"cancelOpName"</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495077"><span class="hs-identifier hs-var">_x</span></a></span><span>
|
|
</span><span id="line-403"></span><span> </span><span class="hs-keyword">in</span><span>
|
|
</span><span id="line-404"></span><span> </span><span class="hs-keyword">if</span><span> </span><span class="annot"><span class="annottext">Text -> Text -> Bool
|
|
forall a. Eq a => a -> a -> Bool
|
|
</span><span class="hs-operator hs-var">(Prelude.==)</span></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495064"><span class="hs-identifier hs-var">_v</span></a></span><span> </span><span class="annot"><span class="annottext">Text
|
|
forall value. FieldDefault value => value
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.fieldDefault</span></span><span> </span><span class="hs-keyword">then</span><span>
|
|
</span><span id="line-405"></span><span> </span><span class="annot"><span class="annottext">Builder
|
|
forall a. Monoid a => a
|
|
</span><span class="hs-identifier hs-var">Data.Monoid.mempty</span></span><span>
|
|
</span><span id="line-406"></span><span> </span><span class="hs-keyword">else</span><span>
|
|
</span><span id="line-407"></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-408"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span> </span><span class="annot"><span class="hs-number">34</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-409"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
|
|
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-410"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495063"><span class="annot"><span class="annottext">bs :: ByteString
|
|
</span><a href="#local-6989586621679495063"><span class="hs-identifier hs-var">bs</span></a></span></span><span>
|
|
</span><span id="line-411"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-412"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span>
|
|
</span><span id="line-413"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Int -> Word64
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -> Int
|
|
</span><span class="hs-identifier hs-var">Data.ByteString.length</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495063"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-414"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putBytes</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495063"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-415"></span><span> </span><span class="annot"><span class="annottext">Text -> ByteString
|
|
</span><span class="hs-identifier hs-var">Data.Text.Encoding.encodeUtf8</span></span><span>
|
|
</span><span id="line-416"></span><span> </span><span class="annot"><span class="annottext">Text
|
|
</span><a href="#local-6989586621679495064"><span class="hs-identifier hs-var">_v</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-417"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-418"></span><span> </span><span class="hs-special">(</span><span class="hs-keyword">let</span><span>
|
|
</span><span id="line-419"></span><span> </span><span id="local-6989586621679495062"><span class="annot"><span class="annottext">p :: Vector Code
|
|
</span><a href="#local-6989586621679495062"><span class="hs-identifier hs-var hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.view</span></span><span>
|
|
</span><span id="line-420"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">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
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Field.field</span></span><span> </span><span class="hs-glyph">@</span><span class="annot"><span class="hs-string">"vec'queueClosedExceptionTypes"</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495077"><span class="hs-identifier hs-var">_x</span></a></span><span>
|
|
</span><span id="line-421"></span><span> </span><span class="hs-keyword">in</span><span>
|
|
</span><span id="line-422"></span><span> </span><span class="hs-keyword">if</span><span> </span><span class="annot"><span class="annottext">Vector Code -> Bool
|
|
forall (v :: * -> *) a. Vector v a => v a -> Bool
|
|
</span><span class="hs-identifier hs-var">Data.Vector.Generic.null</span></span><span> </span><span class="annot"><span class="annottext">Vector Code
|
|
</span><a href="#local-6989586621679495062"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">then</span><span>
|
|
</span><span id="line-423"></span><span> </span><span class="annot"><span class="annottext">Builder
|
|
forall a. Monoid a => a
|
|
</span><span class="hs-identifier hs-var">Data.Monoid.mempty</span></span><span>
|
|
</span><span id="line-424"></span><span> </span><span class="hs-keyword">else</span><span>
|
|
</span><span id="line-425"></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-426"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span> </span><span class="annot"><span class="hs-number">42</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-427"></span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495060"><span class="annot"><span class="annottext">bs :: ByteString
|
|
</span><a href="#local-6989586621679495060"><span class="hs-identifier hs-var">bs</span></a></span></span><span>
|
|
</span><span id="line-428"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Builder -> Builder -> Builder
|
|
forall a. Semigroup a => a -> a -> a
|
|
</span><span class="hs-operator hs-var">(Data.Monoid.<>)</span></span><span>
|
|
</span><span id="line-429"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span>
|
|
</span><span id="line-430"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Int -> Word64
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -> Int
|
|
</span><span class="hs-identifier hs-var">Data.ByteString.length</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495060"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-431"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putBytes</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
|
</span><a href="#local-6989586621679495060"><span class="hs-identifier hs-var">bs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-432"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Builder -> ByteString
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.runBuilder</span></span><span>
|
|
</span><span id="line-433"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Code -> Builder) -> Vector Code -> Builder
|
|
forall (v :: * -> *) a.
|
|
Vector v a =>
|
|
(a -> Builder) -> v a -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.foldMapBuilder</span></span><span>
|
|
</span><span id="line-434"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Int -> Builder) -> (Code -> Int) -> Code -> Builder
|
|
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-435"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
|
|
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
|
</span><span class="hs-operator hs-var">(Prelude..)</span></span><span>
|
|
</span><span id="line-436"></span><span> </span><span class="annot"><span class="annottext">Word64 -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Bytes.putVarInt</span></span><span>
|
|
</span><span id="line-437"></span><span> </span><span class="annot"><span class="annottext">Int -> Word64
|
|
forall a b. (Integral a, Num b) => a -> b
|
|
</span><span class="hs-identifier hs-var">Prelude.fromIntegral</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-438"></span><span> </span><span class="annot"><span class="annottext">Code -> Int
|
|
forall a. Enum a => a -> Int
|
|
</span><span class="hs-identifier hs-var">Prelude.fromEnum</span></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-439"></span><span> </span><span class="annot"><span class="annottext">Vector Code
|
|
</span><a href="#local-6989586621679495062"><span class="hs-identifier hs-var">p</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-440"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">FieldSet -> Builder
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.Encoding.Wire.buildFieldSet</span></span><span>
|
|
</span><span id="line-441"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">FoldLike FieldSet QueueRunnerDef QueueRunnerDef FieldSet FieldSet
|
|
-> QueueRunnerDef -> FieldSet
|
|
forall a s t b. FoldLike a s t a b -> s -> a
|
|
</span><span class="hs-identifier hs-var">Lens.Family2.view</span></span><span> </span><span class="annot"><span class="annottext">FoldLike FieldSet QueueRunnerDef QueueRunnerDef FieldSet FieldSet
|
|
forall msg. Message msg => Lens' msg FieldSet
|
|
</span><span class="hs-identifier hs-var">Data.ProtoLens.unknownFields</span></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495077"><span class="hs-identifier hs-var">_x</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-442"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Control.DeepSeq.NFData</span></span><span> </span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#QueueRunnerDef"><span class="hs-identifier hs-type">QueueRunnerDef</span></a></span><span> </span><span class="hs-keyword">where</span><span>
|
|
</span><span id="line-443"></span><span> </span><span id="local-6989586621679495054"><span class="annot"><span class="annottext">rnf :: QueueRunnerDef -> ()
|
|
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">rnf</span></span></span><span>
|
|
</span><span id="line-444"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-glyph">\</span><span> </span><span id="local-6989586621679495052"><span class="annot"><span class="annottext">x__ :: QueueRunnerDef
|
|
</span><a href="#local-6989586621679495052"><span class="hs-identifier hs-var">x__</span></a></span></span><span>
|
|
</span><span id="line-445"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">FieldSet -> () -> ()
|
|
forall a b. NFData a => a -> b -> b
|
|
</span><span class="hs-identifier hs-var">Control.DeepSeq.deepseq</span></span><span>
|
|
</span><span id="line-446"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">QueueRunnerDef -> FieldSet
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27_unknownFields"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'_unknownFields</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495052"><span class="hs-identifier hs-var">x__</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-447"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -> () -> ()
|
|
forall a b. NFData a => a -> b -> b
|
|
</span><span class="hs-identifier hs-var">Control.DeepSeq.deepseq</span></span><span>
|
|
</span><span id="line-448"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">QueueRunnerDef -> Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'queueName</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495052"><span class="hs-identifier hs-var">x__</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-449"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Vector Text -> () -> ()
|
|
forall a b. NFData a => a -> b -> b
|
|
</span><span class="hs-identifier hs-var">Control.DeepSeq.deepseq</span></span><span>
|
|
</span><span id="line-450"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">QueueRunnerDef -> Vector Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27enqueueOpName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'enqueueOpName</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495052"><span class="hs-identifier hs-var">x__</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-451"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -> () -> ()
|
|
forall a b. NFData a => a -> b -> b
|
|
</span><span class="hs-identifier hs-var">Control.DeepSeq.deepseq</span></span><span>
|
|
</span><span id="line-452"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">QueueRunnerDef -> Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27closeOpName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'closeOpName</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495052"><span class="hs-identifier hs-var">x__</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-453"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -> () -> ()
|
|
forall a b. NFData a => a -> b -> b
|
|
</span><span class="hs-identifier hs-var">Control.DeepSeq.deepseq</span></span><span>
|
|
</span><span id="line-454"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">QueueRunnerDef -> Text
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27cancelOpName"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'cancelOpName</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495052"><span class="hs-identifier hs-var">x__</span></a></span><span class="hs-special">)</span><span>
|
|
</span><span id="line-455"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Vector Code -> () -> ()
|
|
forall a b. NFData a => a -> b -> b
|
|
</span><span class="hs-identifier hs-var">Control.DeepSeq.deepseq</span></span><span>
|
|
</span><span id="line-456"></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">QueueRunnerDef -> Vector Code
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#_QueueRunnerDef%27queueClosedExceptionTypes"><span class="hs-identifier hs-var hs-var">_QueueRunnerDef'queueClosedExceptionTypes</span></a></span><span> </span><span class="annot"><span class="annottext">QueueRunnerDef
|
|
</span><a href="#local-6989586621679495052"><span class="hs-identifier hs-var">x__</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
|
</span><span id="line-457"></span><span class="annot"><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#packedFileDescriptor"><span class="hs-identifier hs-type">packedFileDescriptor</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Data.ByteString.ByteString</span></span><span>
|
|
</span><span id="line-458"></span><span id="packedFileDescriptor"><span class="annot"><span class="annottext">packedFileDescriptor :: ByteString
|
|
</span><a href="Proto.Tensorflow.Core.Protobuf.QueueRunner.html#packedFileDescriptor"><span class="hs-identifier hs-var hs-var">packedFileDescriptor</span></a></span></span><span>
|
|
</span><span id="line-459"></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-string">"\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"</span></span></pre></body></html> |