home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a066 / 1.img / GEN.CH < prev    next >
Encoding:
Text File  |  1992-03-20  |  310 b   |  13 lines
  1. /*
  2.     gen.ch
  3.  
  4.     A couple of useful commands.
  5.     Acknowledgements to Reference(Clipper) for second one.
  6. */
  7.  
  8. #translate  ifnil(<var>, <val>)          ;
  9.             =>  if(<var> == NIL, <val>, <var>)
  10.  
  11. #command    ifnil <var> := <value>  ;
  12.             =>  if(<var> == NIL, <var> := <value>, <var>)
  13.