home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #3 / amigamamagazinepolishissue1998.iso / blabla / bed_defs&macros / rexx / e / debuge.bed < prev    next >
Text File  |  1998-01-24  |  754b  |  44 lines
  1. /*
  2. ** $VER: DebugE.bed 1.0 (21.01.97)
  3. **
  4. ** Invoke the AmigaE Debugger
  5. **
  6. ** by Karol Bryd
  7. */
  8.  
  9. OPTIONS RESULTS
  10.  
  11. SaveFile QUIET NOICON
  12.  
  13. GetFilePath PATH
  14. path = RESULT
  15.  
  16. GetFilePath FILE
  17. file=RESULT
  18.  
  19. GetFilePath
  20. name=RESULT
  21.  
  22. OPTIONS FAILAT 10000
  23. ADDRESS COMMAND 'e:bin/flushcache'
  24.  
  25. exec='e:bin/mac2efront ' || 't:tmp_e.e ' || name
  26.  
  27. ADDRESS COMMAND exec
  28.  
  29. IF ~EXISTS('t:tmp_e.e') THEN ADDRESS COMMAND 'copy ' || name || ' t:tmp_e.e QUIET'
  30.  
  31. ADDRESS COMMAND 'e:bin/ec DEBUG ' || 't:tmp_e.e'
  32.  
  33. PARSE VAR name name1 '.e'
  34.  
  35. ADDRESS COMMAND 'copy t:tmp_e ' || name1 || ' QUIET'
  36.  
  37. /* invoke edbg */
  38.  
  39. ADDRESS COMMAND 'cd t:' || '0A'X || 'e:bin/edbg tmp_e'
  40.  
  41. /* delete all temporary files */
  42. ADDRESS COMMAND 'delete t:tmp_e QUIET'
  43. ADDRESS COMMAND 'delete t:tmp_e.e QUIET'
  44.