home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TPTOOL3.ZIP / LJUST.INC < prev    next >
Encoding:
Text File  |  1987-04-18  |  120 b   |  9 lines
  1.  
  2. (*
  3.  * ljust - macro for left justified strings in writeln format
  4.  *
  5.  *)
  6.  
  7. #define LJUST %1,'':(%2-length(%1))
  8.  
  9.