home *** CD-ROM | disk | FTP | other *** search
/ Amiga Elysian Archive / AmigaElysianArchive.iso / prog / arexx / rxarplib.lha / rexx / filelist / findbottom.txed < prev    next >
Encoding:
Text File  |  1988-07-13  |  138 b   |  11 lines
  1. /* this finds the bottom of a file */
  2. OPTIONS results
  3.  
  4. Bottom
  5. Up
  6.  
  7. STATUS R
  8. parse var result row rowno rest
  9. rowno = rowno - 1
  10. return rowno
  11.