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

 setprint()          Set the print flag
------------------------------------------------------------------------------
 Declaration
   getset.hdr

 Syntax
   proc setprint extern
   param value logical lOn

 Arguments
   lOn is the new setting for the flag.

 Return
   None.

 Description
   The setprint() function sets the print flag according to the
   passed parameter.

 Example
   #define EXAMPLE_IO
   #include example.hdr

   proc Test_setprint
   ? getprint()                // prints .f.
   set print on
   ? getprint()                // prints .t.
   setprint( .f. )
   ? getprint()                // prints .f.
   endproc

   proc main
   Test_setprint()
   endproc