Click above to get retro games delivered to your door ever month!

 TOOLVER()
 Queries the version number of the CA-Clipper Tools in use
------------------------------------------------------------------------------
 Syntax

     TOOLVER(<lCheckDriver>) --> cVersion

 Argument

     <lCheckDriver>  When passed as .T., the function checks if the
     Extended Drivers correspond to the library.  If not, the function
     returns "0.00".

 Returns

     TOOLVER() returns CA-Clipper Tools as a string in the "n.nn" format; or
     "0.00", if the Extended Drivers does not correspond to the library.

 Description

     This function determines the current CA-Clipper Tools version.  It also
     allows you to check if the CT.LIB and the Extended Drivers CTUS.OBJ
     agree.  This agreement is essential.  If they do not agree, the function
     returns "0.00".

 Examples

     .  Query the CA-Clipper Tools version:

        ? TOOLVER()               // e.g. "5.01"

     .  Verify the driver version:

        IF TOOLVER() <> TOOLVER(.T.)
           ? "Wrong driver or driver not linked in..."
        ENDIF