home *** CD-ROM | disk | FTP | other *** search
/ Amiga Developer CD v1.2 / amidev_cd_12.iso / reference / amiga_mail_vol2 / iii-1 / ispy_stubs.asm < prev    next >
Assembly Source File  |  1992-09-03  |  2KB  |  78 lines
  1. **
  2. **      ISpy stubs
  3. **
  4. **
  5. ** Copyright (c) 1991 Commodore-Amiga, Inc.
  6. **
  7. ** This example is provided in electronic form by Commodore-Amiga,
  8. ** Inc. for use with the Amiga Mail Volume II technical publication.
  9. ** Amiga Mail Volume II contains additional information on the correct
  10. ** usage of the techniques and operating system functions presented in
  11. ** these examples.  The source and executable code of these examples may
  12. ** only be distributed in free electronic form, via bulletin board or
  13. ** as part of a fully non-commercial and freely redistributable
  14. ** diskette.  Both the source and executable code (including comments)
  15. ** must be included, without modification, in any copy.  This example
  16. ** may not be published in printed form or distributed with any
  17. ** commercial product. However, the programming techniques and support
  18. ** routines set forth in these examples may be used in the development
  19. ** of original executable software products for Commodore Amiga
  20. ** computers.
  21. **
  22. ** All other rights reserved.
  23. **
  24. ** This example is provided "as-is" and is subject to change; no
  25. ** warranties are made.  All use is at your own risk. No liability or
  26. ** responsibility is assumed.
  27. **
  28. **
  29.     INCLUDE "exec/types.i"
  30.  
  31.     SECTION CODE
  32.  
  33.     XREF    _SysBase
  34.  
  35.     XREF    _LVOForbid
  36.     XREF    _LVOPermit
  37.  
  38.     XREF    _newOpenScreen
  39.     XREF    _newOpenWindowTagList
  40.     XREF    _newFreeMem
  41.     XREF    _newSetFont
  42.  
  43.     XDEF    _OpenScreenStub
  44.     XDEF    _OpenWindowTagListStub
  45.     XDEF    _FreeMemStub
  46.     XDEF    _SetFontStub
  47.  
  48.  
  49. _OpenScreenStub:
  50.     movem.l    a4,-(sp)
  51.     lea        4(sp),a4
  52.     jsr        _newOpenScreen
  53.     movem.l    (sp)+,a4
  54.     rts
  55.  
  56. _OpenWindowTagListStub:
  57.     movem.l    a4,-(sp)
  58.     lea        4(sp),a4
  59.     jsr        _newOpenWindowTagList
  60.     movem.l    (sp)+,a4
  61.     rts
  62.  
  63. _FreeMemStub:
  64.     movem.l    a4,-(sp)
  65.     lea        4(sp),a4
  66.     jsr        _newFreeMem
  67.     movem.l    (sp)+,a4
  68.     rts
  69.  
  70. _SetFontStub:
  71.     movem.l    a4,-(sp)
  72.     lea        4(sp),a4
  73.     jsr        _newSetFont
  74.     movem.l    (sp)+,a4
  75.     rts
  76.  
  77.     END
  78.