support empty array expression in presto

Author: nooberfsh

dialects/presto/src/Database/Sql/Presto/Parser.hs

@@ -948,7 +948,7 @@ arrayPrimaryExprP :: Parser (Expr RawNames Range)
 arrayPrimaryExprP = do
     r <- Tok.arrayP
     _ <- Tok.openBracketP
-    exprs <- exprP `sepBy1` Tok.commaP
+    exprs <- exprP `sepBy` Tok.commaP
     r' <- Tok.closeBracketP
     return $ ArrayExpr (r <> r') exprs
 

test/Database/Sql/Presto/Parser/Test.hs

@@ -119,6 +119,7 @@ testParser = test
         , "SELECT CURRENT_TIME(1);"
         , "SELECT CURRENT_DATE;"
         , "SELECT ARRAY[1+1, LOCALTIME];"
+        , "SELECT ARRAY[];"
         , "SELECT CAST(NULL AS BIGINT);"
         , "SELECT TRY_CAST(NULL AS BIGINT);"
         , "SELECT TRY_CAST(NULL AS BIGINT ARRAY);"