home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / Editor / Edge1721.DMS / Edge1721.adf / ExtraStuff / Edge_SasC.lha / rexx / hn_IndentCFile.edge < prev    next >
Encoding:
Text File  |  1993-11-09  |  594 b   |  35 lines
  1. /* Edge macro: hn_IndentCFile
  2. **
  3. ** $VER: hn_IndentCFile.edge 1.3 (16-Feb-93 00:30:15)
  4. **
  5. ** Usage:    hn_IndentCFile
  6. **
  7. ** Synopsis: Run GNU-Indent on current file
  8. **
  9. ** Author:   Henrik Nordström
  10. **           Ängsvägen 1
  11. **           S 756 45 Uppsala
  12. */
  13.  
  14.  
  15. parse arg indentoptions
  16.  
  17. options results
  18.  
  19. if indentoptions="" then do
  20.  'getenvvar _fe_user7'
  21.  indentoptions=result
  22. end
  23.  
  24. 'getenvvar _fe_name'
  25. filename=result
  26.  
  27. address command 'indent <"edge:'filename'" 'indentoptions' -o t:temp.c'
  28. if RC ~= 0 then exit RC
  29. 'position sof'
  30. 'blockoff'
  31. 'markblock'
  32. 'position eof'
  33. 'erase'
  34. 'include "t:temp.c"'
  35.