X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=mcs%2Fmbas%2Fclass.cs;h=ed4a5fe0b6d662c66a129726483c8bedd9dc6c2c;hb=747952ff2eea2f8f2599ab8651741e18959e2a64;hp=82a432770ee608ea0fe621cfb507b9cc9d4d18d3;hpb=abef0c165e6f97f0b6886f1d54e40085d74a5b26;p=mono.git diff --git a/mcs/mbas/class.cs b/mcs/mbas/class.cs index 82a432770ee..ed4a5fe0b6d 100644 --- a/mcs/mbas/class.cs +++ b/mcs/mbas/class.cs @@ -1641,7 +1641,7 @@ namespace Mono.MonoBASIC { if ((flags & Modifiers.PRIVATE) != 0){ if ((flags & vao) != 0){ Report.Error ( - 31408, loc, name + + 30266, loc, name + ": Members marked as Overridable or Overrides can not be Private"); ok = false; } @@ -2202,7 +2202,7 @@ namespace Mono.MonoBASIC { WarningNotHiding (parent);*/ if ((ModFlags & Modifiers.OVERRIDE) != 0){ - Report.Error (30284, Location, + Report.Error (30398, Location, parent.MakeName (Name) + " : No suitable methods found to override"); } @@ -3331,7 +3331,7 @@ namespace Mono.MonoBASIC { TypeManager.MonoBASIC_Name (MemberType) + "' is less " + "accessible than property `" + Name + "'"); else if (this is Method) - Report.Error (50, Location, + Report.Error (30508, Location, "Inconsistent accessibility: return type `" + TypeManager.MonoBASIC_Name (MemberType) + "' is less " + "accessible than method `" + Name + "'");