This file is indexed.

/usr/share/doc/libghc-hdbc-odbc-doc/html/src/Database-HDBC-ODBC-TypeConv.html is in libghc-hdbc-odbc-doc 2.3.1.1-2.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html>
<head>
<!-- Generated by HsColour, http://code.haskell.org/~malcolm/hscolour/ -->
<title>dist-ghc/build/Database/HDBC/ODBC/TypeConv.hs</title>
<link type='text/css' rel='stylesheet' href='hscolour.css' />
</head>
<body>
<pre><a name="line-1"></a><span class='hs-comment'>{-# LINE 1 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-2"></a><span class='hs-comment'>-- -*- mode: haskell; -*-</span>
<a name="line-3"></a><span class='hs-comment'>{-# LINE 2 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-4"></a><span class='hs-comment'>{-# CFILES hdbc-odbc-helper.c #-}</span>
<a name="line-5"></a><span class='hs-comment'>-- Above line for hugs</span>
<a name="line-6"></a><span class='hs-keyword'>module</span> <span class='hs-conid'>Database</span><span class='hs-varop'>.</span><span class='hs-conid'>HDBC</span><span class='hs-varop'>.</span><span class='hs-conid'>ODBC</span><span class='hs-varop'>.</span><span class='hs-conid'>TypeConv</span><span class='hs-layout'>(</span><span class='hs-varid'>fromOTypeInfo</span><span class='hs-layout'>,</span> <span class='hs-varid'>fromOTypeCol</span><span class='hs-layout'>)</span> <span class='hs-keyword'>where</span>
<a name="line-7"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Database</span><span class='hs-varop'>.</span><span class='hs-conid'>HDBC</span><span class='hs-varop'>.</span><span class='hs-conid'>Types</span>
<a name="line-8"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Database</span><span class='hs-varop'>.</span><span class='hs-conid'>HDBC</span>
<a name="line-9"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Database</span><span class='hs-varop'>.</span><span class='hs-conid'>HDBC</span><span class='hs-varop'>.</span><span class='hs-conid'>DriverUtils</span>
<a name="line-10"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Database</span><span class='hs-varop'>.</span><span class='hs-conid'>HDBC</span><span class='hs-varop'>.</span><span class='hs-conid'>ODBC</span><span class='hs-varop'>.</span><span class='hs-conid'>Types</span>
<a name="line-11"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Database</span><span class='hs-varop'>.</span><span class='hs-conid'>HDBC</span><span class='hs-varop'>.</span><span class='hs-conid'>ODBC</span><span class='hs-varop'>.</span><span class='hs-conid'>Utils</span>
<a name="line-12"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Foreign</span><span class='hs-varop'>.</span><span class='hs-conid'>C</span><span class='hs-varop'>.</span><span class='hs-conid'>Types</span>
<a name="line-13"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Foreign</span><span class='hs-varop'>.</span><span class='hs-conid'>ForeignPtr</span>
<a name="line-14"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Foreign</span><span class='hs-varop'>.</span><span class='hs-conid'>Ptr</span>
<a name="line-15"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Control</span><span class='hs-varop'>.</span><span class='hs-conid'>Concurrent</span><span class='hs-varop'>.</span><span class='hs-conid'>MVar</span>
<a name="line-16"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Foreign</span><span class='hs-varop'>.</span><span class='hs-conid'>C</span><span class='hs-varop'>.</span><span class='hs-conid'>String</span>
<a name="line-17"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Foreign</span><span class='hs-varop'>.</span><span class='hs-conid'>Marshal</span>
<a name="line-18"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Foreign</span><span class='hs-varop'>.</span><span class='hs-conid'>Storable</span>
<a name="line-19"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Control</span><span class='hs-varop'>.</span><span class='hs-conid'>Monad</span>
<a name="line-20"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Data</span><span class='hs-varop'>.</span><span class='hs-conid'>List</span>
<a name="line-21"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Data</span><span class='hs-varop'>.</span><span class='hs-conid'>Word</span>
<a name="line-22"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Data</span><span class='hs-varop'>.</span><span class='hs-conid'>Int</span>
<a name="line-23"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Control</span><span class='hs-varop'>.</span><span class='hs-conid'>Exception</span>
<a name="line-24"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>System</span><span class='hs-varop'>.</span><span class='hs-conid'>IO</span>
<a name="line-25"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Data</span><span class='hs-varop'>.</span><span class='hs-conid'>Maybe</span>
<a name="line-26"></a>
<a name="line-27"></a><a name="l"></a><span class='hs-definition'>l</span> <span class='hs-keyword'>_</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>return</span> <span class='hs-conid'>()</span>
<a name="line-28"></a><span class='hs-comment'>-- l m = hPutStrLn stderr ("\n" ++ m)</span>
<a name="line-29"></a>
<a name="line-30"></a>
<a name="line-31"></a><span class='hs-comment'>{-# LINE 31 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-32"></a>
<a name="line-33"></a><span class='hs-comment'>{-# LINE 32 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-34"></a>
<a name="line-35"></a><span class='hs-comment'>{-# LINE 33 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-36"></a>
<a name="line-37"></a><span class='hs-comment'>{-# LINE 34 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-38"></a>
<a name="line-39"></a><a name="fromOTypeInfo"></a><span class='hs-definition'>fromOTypeInfo</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>String</span>         <span class='hs-comment'>-- ^ Column name</span>
<a name="line-40"></a>              <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>Int16</span> <span class='hs-comment'>-- ^ Data type</span>
<a name="line-41"></a><span class='hs-comment'>{-# LINE 37 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-42"></a>              <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>Word64</span>     <span class='hs-comment'>-- ^ Column size</span>
<a name="line-43"></a><span class='hs-comment'>{-# LINE 38 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-44"></a>              <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>Int16</span> <span class='hs-comment'>-- ^ Is it nullable</span>
<a name="line-45"></a><span class='hs-comment'>{-# LINE 39 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-46"></a>              <span class='hs-keyglyph'>-&gt;</span> <span class='hs-layout'>(</span><span class='hs-conid'>String</span><span class='hs-layout'>,</span> <span class='hs-conid'>SqlColDesc</span><span class='hs-layout'>)</span>
<a name="line-47"></a><span class='hs-definition'>fromOTypeInfo</span> <span class='hs-varid'>colname</span> <span class='hs-varid'>datatype</span> <span class='hs-varid'>colsize</span> <span class='hs-varid'>nullable</span> <span class='hs-keyglyph'>=</span>
<a name="line-48"></a>    <span class='hs-layout'>(</span><span class='hs-varid'>colname</span><span class='hs-layout'>,</span>
<a name="line-49"></a>     <span class='hs-conid'>SqlColDesc</span> <span class='hs-layout'>{</span><span class='hs-varid'>colType</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>convdatatype</span> <span class='hs-varid'>datatype</span><span class='hs-layout'>,</span>
<a name="line-50"></a>                 <span class='hs-varid'>colOctetLength</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>Nothing</span><span class='hs-layout'>,</span>
<a name="line-51"></a>                 <span class='hs-varid'>colDecDigits</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>Nothing</span><span class='hs-layout'>,</span>
<a name="line-52"></a>                 <span class='hs-varid'>colSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>Just</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>colsize</span><span class='hs-layout'>)</span><span class='hs-layout'>,</span>
<a name="line-53"></a>                 <span class='hs-varid'>colNullable</span> <span class='hs-keyglyph'>=</span> <span class='hs-keyword'>case</span> <span class='hs-varid'>nullable</span> <span class='hs-keyword'>of</span>
<a name="line-54"></a>                                 <span class='hs-num'>0</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>Just</span> <span class='hs-conid'>False</span>
<a name="line-55"></a><span class='hs-comment'>{-# LINE 48 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-56"></a>                                 <span class='hs-num'>1</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>Just</span> <span class='hs-conid'>True</span>
<a name="line-57"></a><span class='hs-comment'>{-# LINE 49 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-58"></a>                                 <span class='hs-keyword'>_</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>Nothing</span>
<a name="line-59"></a>                <span class='hs-layout'>}</span>
<a name="line-60"></a>    <span class='hs-layout'>)</span>
<a name="line-61"></a>
<a name="line-62"></a><a name="fromOTypeCol"></a><span class='hs-definition'>fromOTypeCol</span> <span class='hs-layout'>(</span><span class='hs-keyword'>_</span><span class='hs-conop'>:</span><span class='hs-keyword'>_</span><span class='hs-conop'>:</span><span class='hs-keyword'>_</span><span class='hs-conop'>:</span><span class='hs-varid'>colname</span><span class='hs-conop'>:</span><span class='hs-varid'>datatype</span><span class='hs-conop'>:</span><span class='hs-keyword'>_</span><span class='hs-conop'>:</span><span class='hs-varid'>colsize</span><span class='hs-conop'>:</span><span class='hs-varid'>buflen</span><span class='hs-conop'>:</span><span class='hs-varid'>decdig</span><span class='hs-conop'>:</span><span class='hs-varid'>precrad</span><span class='hs-conop'>:</span><span class='hs-varid'>nullable</span><span class='hs-conop'>:</span><span class='hs-keyword'>_</span><span class='hs-conop'>:</span><span class='hs-keyword'>_</span><span class='hs-conop'>:</span><span class='hs-keyword'>_</span><span class='hs-conop'>:</span><span class='hs-varid'>subtype</span><span class='hs-conop'>:</span><span class='hs-varid'>octetlen</span><span class='hs-conop'>:</span><span class='hs-keyword'>_</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=</span>
<a name="line-63"></a>    <span class='hs-varid'>fromOTypeInfo</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromSql</span> <span class='hs-varid'>colname</span><span class='hs-layout'>)</span>
<a name="line-64"></a>                  <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-varid'>fromSql</span> <span class='hs-varid'>datatype</span><span class='hs-layout'>)</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>Int</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-65"></a>                  <span class='hs-layout'>(</span><span class='hs-varid'>fromSql</span> <span class='hs-varid'>colsize</span><span class='hs-layout'>)</span>
<a name="line-66"></a>                  <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-varid'>fromSql</span> <span class='hs-varid'>nullable</span><span class='hs-layout'>)</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>Int</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-67"></a><span class='hs-definition'>fromOTypeCol</span> <span class='hs-varid'>x</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>error</span> <span class='hs-varop'>$</span> <span class='hs-str'>"fromOTypeCol: unexpected result set: "</span> <span class='hs-varop'>++</span> <span class='hs-varid'>show</span> <span class='hs-varid'>x</span>
<a name="line-68"></a>
<a name="line-69"></a><a name="convdatatype"></a><span class='hs-definition'>convdatatype</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>Int16</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlTypeId</span>
<a name="line-70"></a><span class='hs-comment'>{-# LINE 61 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-71"></a><span class='hs-definition'>convdatatype</span> <span class='hs-varid'>intype</span> <span class='hs-keyglyph'>=</span>
<a name="line-72"></a>    <span class='hs-keyword'>case</span> <span class='hs-varid'>intype</span> <span class='hs-keyword'>of</span>
<a name="line-73"></a>      <span class='hs-num'>1</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlCharT</span>
<a name="line-74"></a><span class='hs-comment'>{-# LINE 64 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-75"></a>      <span class='hs-num'>12</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlVarCharT</span>
<a name="line-76"></a><span class='hs-comment'>{-# LINE 65 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-77"></a>      <span class='hs-comment'>-</span><span class='hs-num'>1</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlLongVarCharT</span>
<a name="line-78"></a><span class='hs-comment'>{-# LINE 66 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-79"></a>      <span class='hs-comment'>-</span><span class='hs-num'>8</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlWCharT</span>
<a name="line-80"></a><span class='hs-comment'>{-# LINE 67 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-81"></a>      <span class='hs-comment'>-</span><span class='hs-num'>9</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlWVarCharT</span>
<a name="line-82"></a><span class='hs-comment'>{-# LINE 68 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-83"></a>      <span class='hs-comment'>-</span><span class='hs-num'>10</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlWLongVarCharT</span>
<a name="line-84"></a><span class='hs-comment'>{-# LINE 69 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-85"></a>      <span class='hs-num'>3</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlDecimalT</span>
<a name="line-86"></a><span class='hs-comment'>{-# LINE 70 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-87"></a>      <span class='hs-num'>2</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlNumericT</span>
<a name="line-88"></a><span class='hs-comment'>{-# LINE 71 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-89"></a>      <span class='hs-num'>5</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlSmallIntT</span>
<a name="line-90"></a><span class='hs-comment'>{-# LINE 72 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-91"></a>      <span class='hs-num'>4</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntegerT</span>
<a name="line-92"></a><span class='hs-comment'>{-# LINE 73 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-93"></a>      <span class='hs-num'>7</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlRealT</span>
<a name="line-94"></a><span class='hs-comment'>{-# LINE 74 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-95"></a>      <span class='hs-num'>6</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlFloatT</span>
<a name="line-96"></a><span class='hs-comment'>{-# LINE 75 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-97"></a>      <span class='hs-num'>8</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlDoubleT</span>
<a name="line-98"></a><span class='hs-comment'>{-# LINE 76 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-99"></a>      <span class='hs-comment'>-</span><span class='hs-num'>7</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlBitT</span>
<a name="line-100"></a><span class='hs-comment'>{-# LINE 77 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-101"></a>      <span class='hs-comment'>-</span><span class='hs-num'>6</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlTinyIntT</span>
<a name="line-102"></a><span class='hs-comment'>{-# LINE 78 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-103"></a>      <span class='hs-comment'>-</span><span class='hs-num'>5</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlBigIntT</span>
<a name="line-104"></a><span class='hs-comment'>{-# LINE 79 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-105"></a>      <span class='hs-comment'>-</span><span class='hs-num'>2</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlBinaryT</span>
<a name="line-106"></a><span class='hs-comment'>{-# LINE 80 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-107"></a>      <span class='hs-comment'>-</span><span class='hs-num'>3</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlVarBinaryT</span>
<a name="line-108"></a><span class='hs-comment'>{-# LINE 81 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-109"></a>      <span class='hs-comment'>-</span><span class='hs-num'>4</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlLongVarBinaryT</span>
<a name="line-110"></a><span class='hs-comment'>{-# LINE 82 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-111"></a>      <span class='hs-num'>91</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlDateT</span>
<a name="line-112"></a><span class='hs-comment'>{-# LINE 83 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-113"></a>      <span class='hs-num'>92</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlTimeT</span>
<a name="line-114"></a><span class='hs-comment'>{-# LINE 84 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-115"></a>      <span class='hs-num'>93</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlTimestampT</span>
<a name="line-116"></a><span class='hs-comment'>{-# LINE 85 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-117"></a>      <span class='hs-comment'>-- ODBC libraries don't seem to define the UTC items</span>
<a name="line-118"></a>       <span class='hs-comment'>-- {const SQL_TYPE_UTCDATETIME} -&gt; SqlUTCDateTimeT</span>
<a name="line-119"></a>       <span class='hs-comment'>-- {const SQL_TYPE_UTCTIME} -&gt; SqlUTCTimeT</span>
<a name="line-120"></a>      <span class='hs-num'>102</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalMonthT</span>
<a name="line-121"></a><span class='hs-comment'>{-# LINE 89 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-122"></a>      <span class='hs-num'>101</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalYearT</span>
<a name="line-123"></a><span class='hs-comment'>{-# LINE 90 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-124"></a>      <span class='hs-num'>107</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalYearToMonthT</span>
<a name="line-125"></a><span class='hs-comment'>{-# LINE 91 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-126"></a>      <span class='hs-num'>103</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalDayT</span>
<a name="line-127"></a><span class='hs-comment'>{-# LINE 92 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-128"></a>      <span class='hs-num'>104</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalHourT</span>
<a name="line-129"></a><span class='hs-comment'>{-# LINE 93 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-130"></a>      <span class='hs-num'>105</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalMinuteT</span>
<a name="line-131"></a><span class='hs-comment'>{-# LINE 94 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-132"></a>      <span class='hs-num'>106</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalSecondT</span>
<a name="line-133"></a><span class='hs-comment'>{-# LINE 95 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-134"></a>      <span class='hs-num'>108</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalDayToHourT</span>
<a name="line-135"></a><span class='hs-comment'>{-# LINE 96 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-136"></a>      <span class='hs-num'>109</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalDayToMinuteT</span>
<a name="line-137"></a><span class='hs-comment'>{-# LINE 97 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-138"></a>      <span class='hs-num'>110</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalDayToSecondT</span>
<a name="line-139"></a><span class='hs-comment'>{-# LINE 98 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-140"></a>      <span class='hs-num'>111</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalHourToMinuteT</span>
<a name="line-141"></a><span class='hs-comment'>{-# LINE 99 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-142"></a>      <span class='hs-num'>112</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalHourToSecondT</span>
<a name="line-143"></a><span class='hs-comment'>{-# LINE 100 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-144"></a>      <span class='hs-num'>113</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlIntervalT</span> <span class='hs-conid'>SqlIntervalMinuteToSecondT</span>
<a name="line-145"></a><span class='hs-comment'>{-# LINE 101 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-146"></a>      <span class='hs-comment'>-</span><span class='hs-num'>11</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlGUIDT</span>
<a name="line-147"></a><span class='hs-comment'>{-# LINE 102 "Database/HDBC/ODBC/TypeConv.hsc" #-}</span>
<a name="line-148"></a>      <span class='hs-varid'>x</span> <span class='hs-keyglyph'>-&gt;</span> <span class='hs-conid'>SqlUnknownT</span> <span class='hs-layout'>(</span><span class='hs-varid'>show</span> <span class='hs-varid'>x</span><span class='hs-layout'>)</span>
</pre></body>
</html>