diff --git a/alliance/src/abl/src/ablerror.h b/alliance/src/abl/src/ablerror.h
index 74630f3c..aa097e0f 100644
--- a/alliance/src/abl/src/ablerror.h
+++ b/alliance/src/abl/src/ablerror.h
@@ -66,7 +66,7 @@
 |                                                             |
 \------------------------------------------------------------*/
 
-# define ablerror( E, V ) (abl_error( (int)(E), (char *)(V), basename(__FILE__), __LINE__ ))
+# define ablerror( E, V ) (abl_error( (int)(E), (char *)(V), autbasename(__FILE__,NULL), __LINE__ ))
 
 /*------------------------------------------------------------\
 |                                                             |