xHarbour is a portable implementation of the Clipper/xBase language (Compiler & complete Run-time libraries). It's practically 100% backward compatible with CA-Clipper 5.2e and 5.3c, and offers many modern language extensions, and extensive Run-time libraries.
Fixed adsfunc.c