diff --git a/harbour/include/hbclass.ch b/harbour/include/hbclass.ch
index 174c57530a..10c4663e00 100644
--- a/harbour/include/hbclass.ch
+++ b/harbour/include/hbclass.ch
@@ -235,10 +235,6 @@ DECLARE TClass ;
 #xtranslate CLASS VAR => CLASSVAR
 #xtranslate CLASS METHOD => CLASSMETHOD
 
-#xcommand METHOD <MethodName> [ AS <type> ] DEFERRED => ;
-   _HB_MEMBER <MethodName>() [ AS <type> ];;
-   s_oClass:AddVirtual( <(MethodName)> )
-
 #xcommand METHOD <MethodName> [ AS <type> ] DEFERRED => ;
    _HB_MEMBER <MethodName>() [ AS <type> ];;
    s_oClass:AddVirtual( <(MethodName)> )