add support for odbc symbols: {} in lexer

tools/Language/SQL/SimpleSQL/LexerTests.lhs

@@ -303,10 +303,11 @@ the + or -.
 
 > odbcLexerTests :: TestItem
 > odbcLexerTests = Group "odbcLexTests" $
->     [ LexTest sqlserver {- {odbc = True} -} s t | (s,t) <-
->     [--("{}", [Symbol "{", Symbol "}"])
->     ]
->     ]
+>     [ LexTest sqlserver {allowOdbc = True} s t | (s,t) <-
+>     [("{}", [Symbol "{", Symbol "}"])
+>     ]]
+>     ++ [LexFails sqlserver "{"
+>        ,LexFails sqlserver "}"]
 
 > combos :: [a] -> Int -> [[a]]
 > combos _ 0 = [[]]

tools/Language/SQL/SimpleSQL/TestTypes.lhs

@@ -4,7 +4,8 @@ Tests.lhs module for the 'interpreter'.
 
 > module Language.SQL.SimpleSQL.TestTypes
 >     (TestItem(..)
->     ,ansi2011,mysql,postgres,oracle,sqlserver) where
+>     ,ansi2011,mysql,postgres,oracle,sqlserver
+>     ,allowOdbc) where
 
 > import Language.SQL.SimpleSQL.Syntax
 > import Language.SQL.SimpleSQL.Lex (Token)