> module Language.SQL.SimpleSQL.EmptyStatement where > > import Language.SQL.SimpleSQL.Syntax > import Language.SQL.SimpleSQL.TestTypes > > emptyStatementTests :: TestItem > emptyStatementTests = Group "empty statement" > [ TestStatement ansi2011 ";" EmptyStatement > , TestStatements ansi2011 ";" [EmptyStatement] > , TestStatements ansi2011 ";;" [EmptyStatement, EmptyStatement] > , TestStatements ansi2011 ";;;" [EmptyStatement, EmptyStatement, EmptyStatement] > , TestStatement ansi2011 "/* comment */ ;" EmptyStatement > , TestStatements ansi2011 "/* comment */ ;" [EmptyStatement] > , TestStatements ansi2011 "/* comment */ ; /* comment */ ;" > [EmptyStatement, EmptyStatement] > , TestStatements ansi2011 "/* comment */ ; /* comment */ ; /* comment */ ;" > [EmptyStatement, EmptyStatement, EmptyStatement] > ]