diff --git a/compiler/nobj.pas b/compiler/nobj.pas
index aa04c311d0..da4078a800 100644
--- a/compiler/nobj.pas
+++ b/compiler/nobj.pas
@@ -665,8 +665,6 @@ implementation
                                 begin
                                   { new one has not override }
                                   if is_class(_class) and
-                                     { in Macintosh Object Pascal, all methods are virtual/override }
-                                     not(m_mac in aktmodeswitches) and
                                      not(po_overridingmethod in pd.procoptions) then
                                    begin
                                      { we start a new virtual tree, hide the old }
diff --git a/compiler/pdecobj.pas b/compiler/pdecobj.pas
index c5f7df5e6e..425d83932a 100644
--- a/compiler/pdecobj.pas
+++ b/compiler/pdecobj.pas
@@ -597,8 +597,7 @@ implementation
                      begin
                        parse_object_proc_directives(pd);
 
-                       { all Macintosh Object Pascal methods are virtual/  }
-                       { override; the override part is handled in nobj    }
+                       { all Macintosh Object Pascal methods are virtual.  }
                        { this can't be a class method, because macpas mode }
                        { has no m_class                                    }
                        if (m_mac in aktmodeswitches) then