home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / M2V11-1.LHA / modula / examples / src / Args.mod next >
Encoding:
Text File  |  1994-09-23  |  148 b   |  13 lines
  1. MODULE Args ;
  2.  
  3. IMPORT M2Lib, StdIO ;
  4.  
  5. VAR
  6.   x : LONGINT ;
  7.  
  8. BEGIN
  9.   FOR x := 0 TO M2Lib.argc-1 DO
  10.     StdIO.puts( M2Lib.argv^[x] )
  11.   END ;
  12. END Args.
  13.