diff --git a/harbour/source/vm/asort.c b/harbour/source/vm/asort.c
index 33e2cf2a1c..24a75b4de6 100644
--- a/harbour/source/vm/asort.c
+++ b/harbour/source/vm/asort.c
@@ -261,7 +261,7 @@ BOOL hb_arraySort( PHB_ITEM pArray, ULONG * pulStart, ULONG * pulCount, PHB_ITEM
       return FALSE;
 }
 
-HB_FUNC( HB_ASORT )
+HB_FUNC( ASORT )
 {
    PHB_ITEM pArray = hb_param( 1, HB_IT_ARRAY );