0 | module Oracle.Types.Value
2 | import Data.ByteString
3 | import Derive.Prelude
4 | import Oracle.Types.DateTime
6 | %language ElabReflection
15 | | OracleString String
16 | | OracleNumber Double
17 | | OracleBinaryFloat Double
18 | | OracleBinaryDouble Double
20 | | OracleRaw ByteString
22 | | OracleBlob ByteString
23 | | OracleDate OracleDate
24 | | OracleTimestamp OracleTimestamp
25 | | OracleTimestampTZ OracleTimestampTZ
26 | | OracleIntervalYM OracleIntervalYM
27 | | OracleIntervalDS OracleIntervalDS
29 | %runElab derive "OracleValue" [Eq,Ord,Show]