{-# LANGUAGE GeneralizedNewtypeDeriving #-}

module Database.PostgreSQL.Pure.Oid
  ( Oid (Oid)
  , _daterange
  , _int4range
  , _int8range
  , _numrange
  , _tsrange
  , _tstzrange
  , bit
  , bitArray
  , bool
  , boolArray
  , box
  , boxArray
  , bpchar
  , bpcharArray
  , bytea
  , byteaArray
  , char
  , charArray
  , cid
  , cidArray
  , cidr
  , cidrArray
  , circle
  , circleArray
  , date
  , dateArray
  , daterange
  , float4
  , float4Array
  , float8
  , float8Array
  , inet
  , inetArray
  , int2
  , int2Array
  , int2vector
  , int2vectorArray
  , int4
  , int4Array
  , int4range
  , int8
  , int8Array
  , int8range
  , interval
  , intervalArray
  , json
  , jsonArray
  , jsonb
  , jsonbArray
  , line
  , lineArray
  , lseg
  , lsegArray
  , macaddr
  , macaddrArray
  , money
  , moneyArray
  , name
  , nameArray
  , numeric
  , numericArray
  , numrange
  , oid
  , oidArray
  , oidvector
  , oidvectorArray
  , path
  , pathArray
  , point
  , pointArray
  , polygon
  , polygonArray
  , record
  , recordArray
  , refcursor
  , refcursorArray
  , regclass
  , regclassArray
  , regoper
  , regoperArray
  , regoperator
  , regoperatorArray
  , regproc
  , regprocArray
  , regprocedure
  , regprocedureArray
  , regtype
  , regtypeArray
  , sqlIdentifier
  , text
  , textArray
  , tid
  , tidArray
  , time
  , timeArray
  , timestamp
  , timestampArray
  , timestamptz
  , timestamptzArray
  , timetz
  , timetzArray
  , tsrange
  , tstzrange
  , unknown
  , uuid
  , uuidArray
  , varbit
  , varbitArray
  , varchar
  , varcharArray
  , void
  , xid
  , xidArray
  , xml
  , xmlArray
  ) where

import           Control.Applicative (Alternative ((<|>)))
import           Data.Int            (Int32)
import           Text.Read           (Read (readPrec))
import qualified Text.Read           as R
import qualified Text.Read.Lex       as R

-- | OID.
--
-- Constant values are listed in @Database.PostgreSQL.Pure.Oid@.
newtype Oid = Oid Int32 deriving (Oid -> Oid -> Bool
(Oid -> Oid -> Bool) -> (Oid -> Oid -> Bool) -> Eq Oid
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Oid -> Oid -> Bool
$c/= :: Oid -> Oid -> Bool
== :: Oid -> Oid -> Bool
$c== :: Oid -> Oid -> Bool
Eq, Integer -> Oid
Oid -> Oid
Oid -> Oid -> Oid
(Oid -> Oid -> Oid)
-> (Oid -> Oid -> Oid)
-> (Oid -> Oid -> Oid)
-> (Oid -> Oid)
-> (Oid -> Oid)
-> (Oid -> Oid)
-> (Integer -> Oid)
-> Num Oid
forall a.
(a -> a -> a)
-> (a -> a -> a)
-> (a -> a -> a)
-> (a -> a)
-> (a -> a)
-> (a -> a)
-> (Integer -> a)
-> Num a
fromInteger :: Integer -> Oid
$cfromInteger :: Integer -> Oid
signum :: Oid -> Oid
$csignum :: Oid -> Oid
abs :: Oid -> Oid
$cabs :: Oid -> Oid
negate :: Oid -> Oid
$cnegate :: Oid -> Oid
* :: Oid -> Oid -> Oid
$c* :: Oid -> Oid -> Oid
- :: Oid -> Oid -> Oid
$c- :: Oid -> Oid -> Oid
+ :: Oid -> Oid -> Oid
$c+ :: Oid -> Oid -> Oid
Num)

bool :: Oid
bool :: Oid
bool = Oid
16

bytea :: Oid
bytea :: Oid
bytea = Oid
17

char :: Oid
char :: Oid
char = Oid
18

name :: Oid
name :: Oid
name = Oid
19

int8 :: Oid
int8 :: Oid
int8 = Oid
20

int2 :: Oid
int2 :: Oid
int2 = Oid
21

int4 :: Oid
int4 :: Oid
int4 = Oid
23

regproc :: Oid
regproc :: Oid
regproc = Oid
24

text :: Oid
text :: Oid
text = Oid
25

oid :: Oid
oid :: Oid
oid = Oid
26

tid :: Oid
tid :: Oid
tid = Oid
27

xid :: Oid
xid :: Oid
xid = Oid
28

cid :: Oid
cid :: Oid
cid = Oid
29

xml :: Oid
xml :: Oid
xml = Oid
142

point :: Oid
point :: Oid
point = Oid
600

lseg :: Oid
lseg :: Oid
lseg = Oid
601

path :: Oid
path :: Oid
path = Oid
602

box :: Oid
box :: Oid
box = Oid
603

polygon :: Oid
polygon :: Oid
polygon = Oid
604

line :: Oid
line :: Oid
line = Oid
628

cidr :: Oid
cidr :: Oid
cidr = Oid
650

float4 :: Oid
float4 :: Oid
float4 = Oid
700

float8 :: Oid
float8 :: Oid
float8 = Oid
701

unknown :: Oid
unknown :: Oid
unknown = Oid
705

circle :: Oid
circle :: Oid
circle = Oid
718

money :: Oid
money :: Oid
money = Oid
790

macaddr :: Oid
macaddr :: Oid
macaddr = Oid
829

inet :: Oid
inet :: Oid
inet = Oid
869

bpchar :: Oid
bpchar :: Oid
bpchar = Oid
1042

varchar :: Oid
varchar :: Oid
varchar = Oid
1043

date :: Oid
date :: Oid
date = Oid
1082

time :: Oid
time :: Oid
time = Oid
1083

timestamp :: Oid
timestamp :: Oid
timestamp = Oid
1114

timestamptz :: Oid
timestamptz :: Oid
timestamptz = Oid
1184

interval :: Oid
interval :: Oid
interval = Oid
1186

timetz :: Oid
timetz :: Oid
timetz = Oid
1266

bit :: Oid
bit :: Oid
bit = Oid
1560

varbit :: Oid
varbit :: Oid
varbit = Oid
1562

numeric :: Oid
numeric :: Oid
numeric = Oid
1700

refcursor :: Oid
refcursor :: Oid
refcursor = Oid
1790

record :: Oid
record :: Oid
record = Oid
2249

void :: Oid
void :: Oid
void = Oid
2278

recordArray :: Oid
recordArray :: Oid
recordArray = Oid
2287

regprocedure :: Oid
regprocedure :: Oid
regprocedure = Oid
2202

regoper :: Oid
regoper :: Oid
regoper = Oid
2203

regoperator :: Oid
regoperator :: Oid
regoperator = Oid
2204

regclass :: Oid
regclass :: Oid
regclass = Oid
2205

regtype :: Oid
regtype :: Oid
regtype = Oid
2206

uuid :: Oid
uuid :: Oid
uuid = Oid
2950

json :: Oid
json :: Oid
json = Oid
114

jsonb :: Oid
jsonb :: Oid
jsonb = Oid
3802

int2vector :: Oid
int2vector :: Oid
int2vector = Oid
22

oidvector :: Oid
oidvector :: Oid
oidvector = Oid
30

xmlArray :: Oid
xmlArray :: Oid
xmlArray = Oid
143

jsonArray :: Oid
jsonArray :: Oid
jsonArray = Oid
199

lineArray :: Oid
lineArray :: Oid
lineArray = Oid
629

cidrArray :: Oid
cidrArray :: Oid
cidrArray = Oid
651

circleArray :: Oid
circleArray :: Oid
circleArray = Oid
719

moneyArray :: Oid
moneyArray :: Oid
moneyArray = Oid
791

boolArray :: Oid
boolArray :: Oid
boolArray = Oid
1000

byteaArray :: Oid
byteaArray :: Oid
byteaArray = Oid
1001

charArray :: Oid
charArray :: Oid
charArray = Oid
1002

nameArray :: Oid
nameArray :: Oid
nameArray = Oid
1003

int2Array :: Oid
int2Array :: Oid
int2Array = Oid
1005

int2vectorArray :: Oid
int2vectorArray :: Oid
int2vectorArray = Oid
1006

int4Array :: Oid
int4Array :: Oid
int4Array = Oid
1007

regprocArray :: Oid
regprocArray :: Oid
regprocArray = Oid
1008

textArray :: Oid
textArray :: Oid
textArray = Oid
1009

tidArray :: Oid
tidArray :: Oid
tidArray = Oid
1010

xidArray :: Oid
xidArray :: Oid
xidArray = Oid
1011

cidArray :: Oid
cidArray :: Oid
cidArray = Oid
1012

oidvectorArray :: Oid
oidvectorArray :: Oid
oidvectorArray = Oid
1013

bpcharArray :: Oid
bpcharArray :: Oid
bpcharArray = Oid
1014

varcharArray :: Oid
varcharArray :: Oid
varcharArray = Oid
1015

int8Array :: Oid
int8Array :: Oid
int8Array = Oid
1016

pointArray :: Oid
pointArray :: Oid
pointArray = Oid
1017

lsegArray :: Oid
lsegArray :: Oid
lsegArray = Oid
1018

pathArray :: Oid
pathArray :: Oid
pathArray = Oid
1019

boxArray :: Oid
boxArray :: Oid
boxArray = Oid
1020

float4Array :: Oid
float4Array :: Oid
float4Array = Oid
1021

float8Array :: Oid
float8Array :: Oid
float8Array = Oid
1022

polygonArray :: Oid
polygonArray :: Oid
polygonArray = Oid
1027

oidArray :: Oid
oidArray :: Oid
oidArray = Oid
1028

macaddrArray :: Oid
macaddrArray :: Oid
macaddrArray = Oid
1040

inetArray :: Oid
inetArray :: Oid
inetArray = Oid
1041

timestampArray :: Oid
timestampArray :: Oid
timestampArray = Oid
1115

dateArray :: Oid
dateArray :: Oid
dateArray = Oid
1182

timeArray :: Oid
timeArray :: Oid
timeArray = Oid
1183

timestamptzArray :: Oid
timestamptzArray :: Oid
timestamptzArray = Oid
1185

intervalArray :: Oid
intervalArray :: Oid
intervalArray = Oid
1187

numericArray :: Oid
numericArray :: Oid
numericArray = Oid
1231

timetzArray :: Oid
timetzArray :: Oid
timetzArray = Oid
1270

bitArray :: Oid
bitArray :: Oid
bitArray = Oid
1561

varbitArray :: Oid
varbitArray :: Oid
varbitArray = Oid
1563

refcursorArray :: Oid
refcursorArray :: Oid
refcursorArray = Oid
2201

regprocedureArray :: Oid
regprocedureArray :: Oid
regprocedureArray = Oid
2207

regoperArray :: Oid
regoperArray :: Oid
regoperArray = Oid
2208

regoperatorArray :: Oid
regoperatorArray :: Oid
regoperatorArray = Oid
2209

regclassArray :: Oid
regclassArray :: Oid
regclassArray = Oid
2210

regtypeArray :: Oid
regtypeArray :: Oid
regtypeArray = Oid
2211

uuidArray :: Oid
uuidArray :: Oid
uuidArray = Oid
2951

jsonbArray :: Oid
jsonbArray :: Oid
jsonbArray = Oid
3807

int4range :: Oid
int4range :: Oid
int4range = Oid
3904

_int4range :: Oid
_int4range :: Oid
_int4range = Oid
3905

numrange :: Oid
numrange :: Oid
numrange = Oid
3906

_numrange :: Oid
_numrange :: Oid
_numrange = Oid
3907

tsrange :: Oid
tsrange :: Oid
tsrange = Oid
3908

_tsrange :: Oid
_tsrange :: Oid
_tsrange = Oid
3909

tstzrange :: Oid
tstzrange :: Oid
tstzrange = Oid
3910

_tstzrange :: Oid
_tstzrange :: Oid
_tstzrange = Oid
3911

daterange :: Oid
daterange :: Oid
daterange = Oid
3912

_daterange :: Oid
_daterange :: Oid
_daterange = Oid
3913

int8range :: Oid
int8range :: Oid
int8range = Oid
3926

_int8range :: Oid
_int8range :: Oid
_int8range = Oid
3927

sqlIdentifier :: Oid
sqlIdentifier :: Oid
sqlIdentifier = Oid
12664

instance Show Oid where
  show :: Oid -> String
show Oid
o | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
bool = String
"bool"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
bytea = String
"bytea"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
char = String
"char"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
name = String
"name"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
int8 = String
"int8"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
int2 = String
"int2"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
int4 = String
"int4"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regproc = String
"regproc"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
text = String
"text"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
oid = String
"oid"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
tid = String
"tid"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
xid = String
"xid"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
cid = String
"cid"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
xml = String
"xml"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
point = String
"point"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
lseg = String
"lseg"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
path = String
"path"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
box = String
"box"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
polygon = String
"polygon"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
line = String
"line"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
cidr = String
"cidr"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
float4 = String
"float4"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
float8 = String
"float8"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
unknown = String
"unknown"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
circle = String
"circle"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
money = String
"money"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
macaddr = String
"macaddr"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
inet = String
"inet"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
bpchar = String
"bpchar"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
varchar = String
"varchar"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
date = String
"date"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
time = String
"time"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
timestamp = String
"timestamp"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
timestamptz = String
"timestamptz"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
interval = String
"interval"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
timetz = String
"timetz"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
bit = String
"bit"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
varbit = String
"varbit"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
numeric = String
"numeric"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
refcursor = String
"refcursor"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
record = String
"record"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
void = String
"void"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
recordArray = String
"recordArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regprocedure = String
"regprocedure"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regoper = String
"regoper"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regoperator = String
"regoperator"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regclass = String
"regclass"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regtype = String
"regtype"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
uuid = String
"uuid"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
json = String
"json"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
jsonb = String
"jsonb"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
int2vector = String
"int2vector"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
oidvector = String
"oidvector"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
xmlArray = String
"xmlArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
jsonArray = String
"jsonArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
lineArray = String
"lineArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
cidrArray = String
"cidrArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
circleArray = String
"circleArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
moneyArray = String
"moneyArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
boolArray = String
"boolArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
byteaArray = String
"byteaArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
charArray = String
"charArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
nameArray = String
"nameArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
int2Array = String
"int2Array"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
int2vectorArray = String
"int2vectorArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
int4Array = String
"int4Array"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regprocArray = String
"regprocArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
textArray = String
"textArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
tidArray = String
"tidArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
xidArray = String
"xidArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
cidArray = String
"cidArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
oidvectorArray = String
"oidvectorArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
bpcharArray = String
"bpcharArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
varcharArray = String
"varcharArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
int8Array = String
"int8Array"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
pointArray = String
"pointArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
lsegArray = String
"lsegArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
pathArray = String
"pathArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
boxArray = String
"boxArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
float4Array = String
"float4Array"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
float8Array = String
"float8Array"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
polygonArray = String
"polygonArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
oidArray = String
"oidArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
macaddrArray = String
"macaddrArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
inetArray = String
"inetArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
timestampArray = String
"timestampArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
dateArray = String
"dateArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
timeArray = String
"timeArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
timestamptzArray = String
"timestamptzArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
intervalArray = String
"intervalArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
numericArray = String
"numericArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
timetzArray = String
"timetzArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
bitArray = String
"bitArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
varbitArray = String
"varbitArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
refcursorArray = String
"refcursorArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regprocedureArray = String
"regprocedureArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regoperArray = String
"regoperArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regoperatorArray = String
"regoperatorArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regclassArray = String
"regclassArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
regtypeArray = String
"regtypeArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
uuidArray = String
"uuidArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
jsonbArray = String
"jsonbArray"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
int4range = String
"int4range"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
_int4range = String
"_int4range"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
numrange = String
"numrange"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
_numrange = String
"_numrange"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
tsrange = String
"tsrange"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
_tsrange = String
"_tsrange"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
tstzrange = String
"tstzrange"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
_tstzrange = String
"_tstzrange"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
daterange = String
"daterange"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
_daterange = String
"_daterange"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
int8range = String
"int8range"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
_int8range = String
"_int8range"
         | Oid
o Oid -> Oid -> Bool
forall a. Eq a => a -> a -> Bool
== Oid
sqlIdentifier = String
"sqlIdentifier"
  show (Oid Int32
n) = Int32 -> String
forall a. Show a => a -> String
show Int32
n

instance Read Oid where
  readPrec :: ReadPrec Oid
readPrec =
    ReadPrec Oid -> ReadPrec Oid
forall a. ReadPrec a -> ReadPrec a
R.parens
        ( do
            ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"bool"
            Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
bool
        )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"bytea"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
bytea
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"char"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
char
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"name"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
name
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"int8"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
int8
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"int2"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
int2
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"int4"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
int4
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regproc"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regproc
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"text"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
text
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"oid"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
oid
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"tid"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
tid
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"xid"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
xid
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"cid"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
cid
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"xml"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
xml
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"point"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
point
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"lseg"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
lseg
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"path"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
path
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"box"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
box
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"polygon"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
polygon
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"line"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
line
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"cidr"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
cidr
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"float4"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
float4
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"float8"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
float8
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"unknown"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
unknown
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"circle"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
circle
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"money"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
money
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"macaddr"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
macaddr
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"inet"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
inet
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"bpchar"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
bpchar
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"varchar"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
varchar
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"date"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
date
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"time"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
time
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"timestamp"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
timestamp
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"timestamptz"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
timestamptz
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"interval"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
interval
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"timetz"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
timetz
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"bit"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
bit
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"varbit"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
varbit
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"numeric"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
numeric
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"refcursor"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
refcursor
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"record"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
record
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"void"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
void
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"recordArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
recordArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regprocedure"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regprocedure
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regoper"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regoper
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regoperator"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regoperator
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regclass"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regclass
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regtype"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regtype
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"uuid"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
uuid
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"json"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
json
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"jsonb"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
jsonb
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"int2vector"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
int2vector
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"oidvector"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
oidvector
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"xmlArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
xmlArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"jsonArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
jsonArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"lineArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
lineArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"cidrArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
cidrArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"circleArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
circleArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"moneyArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
moneyArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"boolArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
boolArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"byteaArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
byteaArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"charArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
charArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"nameArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
nameArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"int2Array"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
int2Array
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"int2vectorArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
int2vectorArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"int4Array"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
int4Array
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regprocArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regprocArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"textArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
textArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"tidArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
tidArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"xidArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
xidArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"cidArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
cidArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"oidvectorArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
oidvectorArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"bpcharArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
bpcharArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"varcharArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
varcharArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"int8Array"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
int8Array
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"pointArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
pointArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"lsegArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
lsegArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"pathArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
pathArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"boxArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
boxArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"float4Array"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
float4Array
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"float8Array"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
float8Array
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"polygonArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
polygonArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"oidArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
oidArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"macaddrArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
macaddrArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"inetArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
inetArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"timestampArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
timestampArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"dateArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
dateArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"timeArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
timeArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"timestamptzArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
timestamptzArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"intervalArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
intervalArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"numericArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
numericArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"timetzArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
timetzArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"bitArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
bitArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"varbitArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
varbitArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"refcursorArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
refcursorArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regprocedureArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regprocedureArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regoperArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regoperArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regoperatorArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regoperatorArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regclassArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regclassArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"regtypeArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
regtypeArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"uuidArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
uuidArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"jsonbArray"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
jsonbArray
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"int4range"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
int4range
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"_int4range"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
_int4range
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"numrange"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
numrange
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"_numrange"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
_numrange
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"tsrange"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
tsrange
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"_tsrange"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
_tsrange
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"tstzrange"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
tstzrange
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"_tstzrange"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
_tstzrange
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"daterange"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
daterange
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"_daterange"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
_daterange
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"int8range"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
int8range
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"_int8range"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
_int8range
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( do
                ReadP () -> ReadPrec ()
forall a. ReadP a -> ReadPrec a
R.lift (ReadP () -> ReadPrec ()) -> ReadP () -> ReadPrec ()
forall a b. (a -> b) -> a -> b
$ Lexeme -> ReadP ()
R.expect (Lexeme -> ReadP ()) -> Lexeme -> ReadP ()
forall a b. (a -> b) -> a -> b
$ String -> Lexeme
R.Ident String
"sqlIdentifier"
                Oid -> ReadPrec Oid
forall (f :: * -> *) a. Applicative f => a -> f a
pure Oid
sqlIdentifier
            )
        ReadPrec Oid -> ReadPrec Oid -> ReadPrec Oid
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> (Int32 -> Oid
Oid (Int32 -> Oid) -> ReadPrec Int32 -> ReadPrec Oid
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> ReadPrec Int32
forall a. Read a => ReadPrec a
readPrec)