odbc: align cases in convert-sql-type

diff --git a/extra/odbc/odbc.factor b/extra/odbc/odbc.factor
index 014f130ca1b7f087e8ca85c7c2345d26c52b0e4d..cd621f0099711d7826e5b60ba6971b8bb50e3d2b 100644 (file)
--- a/extra/odbc/odbc.factor
+++ b/extra/odbc/odbc.factor
@@ -65,29 +65,29 @@ SYMBOLS:
 
 : convert-sql-type ( number -- symbol )
     {
-        { 1 [ SQL-CHAR ] }
-        { 12  [ SQL-VARCHAR ] }
-        { -1  [ SQL-LONGVARCHAR ] }
-        { -8  [ SQL-WCHAR ] }
-        { -9  [ SQL-WCHARVAR ] }
+        {   1 [ SQL-CHAR ] }
+        {  12 [ SQL-VARCHAR ] }
+        {  -1 [ SQL-LONGVARCHAR ] }
+        {  -8 [ SQL-WCHAR ] }
+        {  -9 [ SQL-WCHARVAR ] }
         { -10 [ SQL-WLONGCHARVAR ] }
-        { 3 [ SQL-DECIMAL ] }
-        { 5 [ SQL-SMALLINT ] }
-        { 2 [ SQL-NUMERIC ] }
-        { 4 [ SQL-INTEGER ] }
-        { 7 [ SQL-REAL ] }
-        { 6 [ SQL-FLOAT ] }
-        { 8 [ SQL-DOUBLE ] }
-        { -7 [ SQL-BIT ] }
-        { -6 [ SQL-TINYINT ] }
-        { -5 [ SQL-BIGINT ] }
-        { -2 [ SQL-BINARY ] }
-        { -3 [ SQL-VARBINARY ] }
-        { -4 [ SQL-LONGVARBINARY ] }
-        { 91 [ SQL-TYPE-DATE ] }
-        { 92 [ SQL-TYPE-TIME ] }
-        { 93 [ SQL-TYPE-TIMESTAMP ] }
-        [ drop SQL-TYPE-UNKNOWN ]
+        {   3 [ SQL-DECIMAL ] }
+        {   5 [ SQL-SMALLINT ] }
+        {   2 [ SQL-NUMERIC ] }
+        {   4 [ SQL-INTEGER ] }
+        {   7 [ SQL-REAL ] }
+        {   6 [ SQL-FLOAT ] }
+        {   8 [ SQL-DOUBLE ] }
+        {  -7 [ SQL-BIT ] }
+        {  -6 [ SQL-TINYINT ] }
+        {  -5 [ SQL-BIGINT ] }
+        {  -2 [ SQL-BINARY ] }
+        {  -3 [ SQL-VARBINARY ] }
+        {  -4 [ SQL-LONGVARBINARY ] }
+        {  91 [ SQL-TYPE-DATE ] }
+        {  92 [ SQL-TYPE-TIME ] }
+        {  93 [ SQL-TYPE-TIMESTAMP ] }
+        [ drop  SQL-TYPE-UNKNOWN ]
     } case ;
 
 : succeeded? ( n -- bool )