Click above to get retro games delivered to your door ever month!
X-Hacker.org- Force 4.0 Reference - getsetfixed() get and set the fixed flag
[<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]
getsetfixed() Get and set the fixed flag
------------------------------------------------------------------------------
Declaration
getset.hdr
Syntax
func logical getsetfixed 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 getsetfixed() function sets the fixed flag and returns its
previous setting.
Example
#define EXAMPLE_MATH
#include example.hdr
proc Test_getsetfixed
vardef
logical lPrevious
enddef
setdecimals( 5 )
? 1.234567890
lPrevious := getsetfixed( .t. )
? lPrevious // prints .f.
? 1.234567890
? getfixed() // prints .t.
getsetfixed( lPrevious )
? 1.234567890
? getfixed() // prints .f.
endproc
proc main
Test_getsetfixed()
endproc
See Also: getfixed() setfixed()
Online resources provided by: http://www.X-Hacker.org --- NG 2 HTML conversion by Dave Pearson