diff --git a/src/fsharp/LexFilter.fs b/src/fsharp/LexFilter.fs
index 131c3755a2f..d22ce3ae701 100755
--- a/src/fsharp/LexFilter.fs
+++ b/src/fsharp/LexFilter.fs
@@ -81,7 +81,7 @@ type Context =
         | CtxtModuleBody _ -> "modbody"
         | CtxtNamespaceBody _ -> "nsbody"
         | CtxtLetDecl(b, p) -> sprintf "let(%b, %s)" b (stringOfPos p)
-        | CtxtValDecl p -> sprintf "modval(%s)" (stringOfPos p)
+        | CtxtValDecl p -> sprintf "val(%s)" (stringOfPos p)
         | CtxtWithAsLet p -> sprintf "withlet(%s)" (stringOfPos p)
         | CtxtWithAsAugment _ -> "withaug"
         | CtxtDo _ -> "do"