WIP: start implementing the rule

webwarrior-ws · Dec 4, 2023 · 55d995d · 55d995d
1 parent 4e59a30
commit 55d995d
Showing 1 changed file with 11 additions and 2 deletions.
diff --git a/src/FSharpLint.Core/Rules/Conventions/SuggestUseAutoProperty.fs b/src/FSharpLint.Core/Rules/Conventions/SuggestUseAutoProperty.fs
@@ -8,8 +8,17 @@ open FSharpLint.Framework.Ast
 open FSharpLint.Framework.Rules
 
 let private runner (args: AstNodeRuleParams) =
-
-    failwith "Not implemented"
+    let dump = sprintf "%A" args.AstNode
+    match args.AstNode with
+    | MemberDefinition(
+        SynMemberDefn.Member(
+            SynBinding(accessibility, kind, _, false, _attributes, _xmlDoc, valData, headPat, returnInfo, expr, bindingRange, _), memberRange)) -> 
+        match headPat with
+        | SynPat.LongIdent(longDotId, extraId, typarDecls, argPats, accessibility, headPatRange) -> 
+            // argPats
+            failwith "Not implemented"
+        | _ -> Array.empty
+    | _ -> Array.empty
 
 let rule =
     { Name = "SuggestUseAutoProperty"