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

 getsetexact()       Get and set the exact flag
------------------------------------------------------------------------------
 Declaration
   getset.hdr

 Syntax
   func logical getsetexact extern
   param value logical lOn

 Arguments
   lOn is the new setting for the flag.

 Return
   A logical indicating the previous setting of the respective system flag.

 Description
   The getsetexact() function sets the exact flag and returns its
   previous setting.

 Example
   #define EXAMPLE_STRING
   #include example.hdr

   proc Test_getsetexact
   vardef
      logical lExact
   enddef
   lExact := getsetexact( .t. )
   ? lExact                        // prints .f.
   ? getexact()                    // prints .t.
   getsetexact( .f. )
   ? getexact()                    // prints .f.
   endproc

   proc main
   Test_getsetexact()
   endproc