@@ -288,14 +288,14 @@ module ASTCollecting =
288288 | SynExpr.InferredUpcast( expr = e)
289289 | SynExpr.InferredDowncast( expr = e)
290290 | SynExpr.AddressOf( expr = e)
291- | SynExpr.DoBang( e, _)
291+ | SynExpr.DoBang( e, _, _ )
292292 | SynExpr.YieldOrReturn( expr = e)
293293 | SynExpr.ArrayOrListComputed( expr = e)
294294 | SynExpr.ComputationExpr( expr = e)
295295 | SynExpr.Do( e, _)
296296 | SynExpr.Assert( e, _)
297297 | SynExpr.Lazy( e, _)
298- | SynExpr.YieldOrReturnFrom(_, e, _) -> walkExpr nextPath e
298+ | SynExpr.YieldOrReturnFrom(_, e, _, _ ) -> walkExpr nextPath e
299299 | SynExpr.SequentialOrImplicitYield( expr1 = e1; expr2 = e2; ifNotStmt = ifNotE) ->
300300 walkExpr nextPath e1
301301 walkExpr nextPath e2
@@ -498,7 +498,7 @@ module ASTCollecting =
498498 | SynMemberDefn.Interface( t, _, members, _) ->
499499 walkType nextPath t
500500 members |> Option.iter ( List.iter ( walkMember nextPath))
501- | SynMemberDefn.Inherit( baseType = t) -> walkType nextPath t
501+ | SynMemberDefn.Inherit( baseType = t) -> t |> Option.iter ( walkType nextPath)
502502 | SynMemberDefn.ValField( field, _) -> walkField nextPath field
503503 | SynMemberDefn.NestedType( typeDefn = tdef) -> walkTypeDefn nextPath tdef
504504 | SynMemberDefn.AutoProperty( attributes = AllAttrs attrs; typeOpt = t; synExpr = e; range = _) ->
0 commit comments