From 016d6e3ab2f90a5bc02df7f22d943e6fa8a009cd Mon Sep 17 00:00:00 2001
From: nojaf <florian.verdonck@outlook.com>
Date: Wed, 7 Jul 2021 20:05:16 +0200
Subject: [PATCH] Add RequireQualifiedAccess to ParsedHashDirectiveArgument
 type.

---
 src/fsharp/SyntaxTree.fs  | 2 +-
 src/fsharp/SyntaxTree.fsi | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/fsharp/SyntaxTree.fs b/src/fsharp/SyntaxTree.fs
index efec365b65..06e1b054ba 100644
--- a/src/fsharp/SyntaxTree.fs
+++ b/src/fsharp/SyntaxTree.fs
@@ -1826,7 +1826,7 @@ type SynModuleOrNamespaceSig =
         match this with
         | SynModuleOrNamespaceSig (range=m) -> m
 
-[<NoEquality; NoComparison>]
+[<NoEquality; NoComparison; RequireQualifiedAccess>]
 type ParsedHashDirectiveArgument =
      | String of value: string * stringKind: SynStringKind * range: Range
      | SourceIdentifier of constant: string * value: string * range: Range
diff --git a/src/fsharp/SyntaxTree.fsi b/src/fsharp/SyntaxTree.fsi
index a04fc70da3..4a82c325a5 100644
--- a/src/fsharp/SyntaxTree.fsi
+++ b/src/fsharp/SyntaxTree.fsi
@@ -2015,7 +2015,7 @@ type SynModuleOrNamespaceSig =
     member Range: range
 
 /// Represents a parsed hash directive argument
-[<NoEquality; NoComparison>]
+[<NoEquality; NoComparison; RequireQualifiedAccess>]
 type ParsedHashDirectiveArgument =
     | String of value: string * stringKind: SynStringKind * range: Range
     | SourceIdentifier of constant: string * value: string * range: Range