Skip to content

Commit c32ff7c

Browse files
committed
add missing default members so that consumers aren't sad
1 parent ab82c62 commit c32ff7c

File tree

2 files changed

+30
-0
lines changed

2 files changed

+30
-0
lines changed

src/FsAutoComplete.Core/UntypedAstUtils.fs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -27,6 +27,7 @@ module Syntax =
2727

2828
loop [] pats
2929

30+
[<AbstractClass>]
3031
type SyntaxCollectorBase() =
3132
abstract WalkSynModuleOrNamespace: SynModuleOrNamespace -> unit
3233
default _.WalkSynModuleOrNamespace m = ()

src/FsAutoComplete.Core/UntypedAstUtils.fsi

Lines changed: 29 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -3,36 +3,65 @@ namespace FSharp.Compiler
33
module Syntax =
44
open FSharp.Compiler.Syntax
55

6+
[<AbstractClass>]
67
type SyntaxCollectorBase =
78
new: unit -> SyntaxCollectorBase
89
abstract WalkSynModuleOrNamespace: SynModuleOrNamespace -> unit
10+
default WalkSynModuleOrNamespace: SynModuleOrNamespace -> unit
911
abstract WalkAttribute: SynAttribute -> unit
12+
default WalkAttribute: SynAttribute -> unit
1013
abstract WalkSynModuleDecl: SynModuleDecl -> unit
14+
default WalkSynModuleDecl: SynModuleDecl -> unit
1115
abstract WalkExpr: SynExpr -> unit
16+
default WalkExpr: SynExpr -> unit
1217
abstract WalkTypar: SynTypar -> unit
18+
default WalkTypar: SynTypar -> unit
1319
abstract WalkTyparDecl: SynTyparDecl -> unit
20+
default WalkTyparDecl: SynTyparDecl -> unit
1421
abstract WalkTypeConstraint: SynTypeConstraint -> unit
22+
default WalkTypeConstraint: SynTypeConstraint -> unit
1523
abstract WalkType: SynType -> unit
24+
default WalkType: SynType -> unit
1625
abstract WalkMemberSig: SynMemberSig -> unit
26+
default WalkMemberSig: SynMemberSig -> unit
1727
abstract WalkPat: SynPat -> unit
28+
default WalkPat: SynPat -> unit
1829
abstract WalkValTyparDecls: SynValTyparDecls -> unit
30+
default WalkValTyparDecls: SynValTyparDecls -> unit
1931
abstract WalkBinding: SynBinding -> unit
32+
default WalkBinding: SynBinding -> unit
2033
abstract WalkSimplePat: SynSimplePat -> unit
34+
default WalkSimplePat: SynSimplePat -> unit
2135
abstract WalkInterfaceImpl: SynInterfaceImpl -> unit
36+
default WalkInterfaceImpl: SynInterfaceImpl -> unit
2237
abstract WalkClause: SynMatchClause -> unit
38+
default WalkClause: SynMatchClause -> unit
2339
abstract WalkInterpolatedStringPart: SynInterpolatedStringPart -> unit
40+
default WalkInterpolatedStringPart: SynInterpolatedStringPart -> unit
2441
abstract WalkMeasure: SynMeasure -> unit
42+
default WalkMeasure: SynMeasure -> unit
2543
abstract WalkComponentInfo: SynComponentInfo -> unit
44+
default WalkComponentInfo: SynComponentInfo -> unit
2645
abstract WalkTypeDefnSigRepr: SynTypeDefnSigRepr -> unit
46+
default WalkTypeDefnSigRepr: SynTypeDefnSigRepr -> unit
2747
abstract WalkUnionCaseType: SynUnionCaseKind -> unit
48+
default WalkUnionCaseType: SynUnionCaseKind -> unit
2849
abstract WalkEnumCase: SynEnumCase -> unit
50+
default WalkEnumCase: SynEnumCase -> unit
2951
abstract WalkField: SynField -> unit
52+
default WalkField: SynField -> unit
3053
abstract WalkTypeDefnSimple: SynTypeDefnSimpleRepr -> unit
54+
default WalkTypeDefnSimple: SynTypeDefnSimpleRepr -> unit
3155
abstract WalkValSig: SynValSig -> unit
56+
default WalkValSig: SynValSig -> unit
3257
abstract WalkMember: SynMemberDefn -> unit
58+
default WalkMember: SynMemberDefn -> unit
3359
abstract WalkUnionCase: SynUnionCase -> unit
60+
default WalkUnionCase: SynUnionCase -> unit
3461
abstract WalkTypeDefnRepr: SynTypeDefnRepr -> unit
62+
default WalkTypeDefnRepr: SynTypeDefnRepr -> unit
3563
abstract WalkTypeDefn: SynTypeDefn -> unit
64+
default WalkTypeDefn: SynTypeDefn -> unit
3665

3766
val walkAst: walker: SyntaxCollectorBase -> input: ParsedInput -> unit
3867

0 commit comments

Comments
 (0)