diff --git a/Dapper/CompiledRegex.cs b/Dapper/CompiledRegex.cs
index 5deef70f1..faffb7c9a 100644
--- a/Dapper/CompiledRegex.cs
+++ b/Dapper/CompiledRegex.cs
@@ -9,7 +9,7 @@ internal static partial class CompiledRegex
     [StringSyntax("Regex")]
 #endif
     private const string
-        WhitespaceOrReservedPattern = @"[\s;/\-+*]|^vacuum$|^commit$|^rollback$",
+        WhitespaceOrReservedPattern = @"[\s;/\-+*]|^vacuum$|^commit$|^rollback$|^revert$",
         LegacyParameterPattern = @"(?<![\p{L}\p{N}@_])[?@:](?![\p{L}\p{N}@_])", // look for ? / @ / : *by itself* - see SupportLegacyParameterTokens
         LiteralTokensPattern = @"(?<![\p{L}\p{N}_])\{=([\p{L}\p{N}_]+)\}", // look for {=abc} to inject member abc as a literal
         PseudoPositionalPattern = @"\?([\p{L}_][\p{L}\p{N}_]*)\?"; // look for ?abc? for the purpose of subst back to ? using member abc
diff --git a/tests/Dapper.Tests/ProcedureTests.cs b/tests/Dapper.Tests/ProcedureTests.cs
index b0371174b..4c15bd7bb 100644
--- a/tests/Dapper.Tests/ProcedureTests.cs
+++ b/tests/Dapper.Tests/ProcedureTests.cs
@@ -333,6 +333,7 @@ public async Task Issue1986_AutoProc_Whitespace(string space)
         [InlineData("VACUUM;", CommandType.Text)]
         [InlineData("cOmmiT", CommandType.Text)]
         [InlineData("rOllbAck", CommandType.Text)]
+        [InlineData("reVErt", CommandType.Text)]
 
         // comments imply text
         [InlineData("foo--bar", CommandType.Text)]