diff --git a/src/fsharp/MethodOverrides.fs b/src/fsharp/MethodOverrides.fs index 637884f2aae..cc210ade4cb 100644 --- a/src/fsharp/MethodOverrides.fs +++ b/src/fsharp/MethodOverrides.fs @@ -308,10 +308,10 @@ module DispatchSlotChecking = | [ overrideBy ] -> if dispatchSlots |> List.exists (fun (RequiredSlot(dispatchSlot,_)) -> OverrideImplementsDispatchSlot g amap m dispatchSlot overrideBy) then + noimpl() + else // Error will be reported below in CheckOverridesAreAllUsedOnce () - else - noimpl() | _ -> fail(Error(FSComp.SR.typrelOverrideWasAmbiguous(FormatMethInfoSig g amap m denv dispatchSlot),m))