home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TPTOOL3.ZIP / INCDEC.INC < prev    next >
Encoding:
Text File  |  1987-05-22  |  252 b   |  13 lines
  1.  
  2. #log Scalar increment and decrement 1.1
  3.  
  4. (*------------------------------------------
  5.  *
  6.  * inc/dec - increment and decrement integers
  7.  *
  8.  *)
  9.  
  10. #define INCR %1 := succ(%1)
  11. #define DECR %1 := pred(%1)
  12.    {-- increment and decrement scalars}
  13.