home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 1 / GoldFishApril1994_CD1.img / d2xx / d246 / screenshare / liblink.asm < prev    next >
Assembly Source File  |  1989-09-13  |  1KB  |  56 lines
  1. ;  liblink.asm -- jimm mackraz, oct 28, 1986
  2. ;  application side interface for C-routines calling example library
  3.  
  4.     include 'exec/types.i'
  5.     include 'exec/libraries.i'
  6.  
  7.     LIBINIT
  8.     LIBDEF    _LVOPublicScreen
  9.     LIBDEF    _LVOPrivateScreen
  10.     LIBDEF    _LVOPubScrLocked
  11.     LIBDEF    _LVOLockPubScreen
  12.     LIBDEF    _LVOUnlockPubScreen
  13.     LIBDEF    _LVOGetPubScrList
  14.  
  15.     ; --- xref from application
  16.     public    _ScrSharBase
  17.  
  18.     ; --- xdef for application
  19.         public    _PublicScreen
  20.     public    _PrivateScreen
  21.     public    _PubScrLocked
  22.     public    _LockPubScreen
  23.     public    _UnlockPubScreen
  24.     public    _GetPubScrList
  25.  
  26. _PublicScreen:
  27.     movea.l    4(sp),a0        ; First argument on stack
  28.     movea.l    8(sp),a1        ; Second argument on stack
  29.     move.l    _ScrSharBase,a6
  30.     jmp    _LVOPublicScreen(a6)
  31.  
  32. _PrivateScreen:
  33.     movea.l    4(sp),a0        ; First argument on stack
  34.     move.l    _ScrSharBase,a6
  35.     jmp    _LVOPrivateScreen(a6)
  36.  
  37. _PubScrLocked:
  38.     movea.l    4(sp),a0        ; First argument on stack
  39.     move.l    _ScrSharBase,a6
  40.     jmp    _LVOPubScrLocked(a6)
  41.  
  42. _LockPubScreen:
  43.     movea.l    4(sp),a0        ; First argument on stack
  44.     move.l    _ScrSharBase,a6
  45.     jmp    _LVOLockPubScreen(a6)
  46.  
  47. _UnlockPubScreen:
  48.     movea.l    4(sp),a0        ; First argument on stack
  49.     move.l    _ScrSharBase,a6
  50.     jmp    _LVOUnlockPubScreen(a6)
  51.  
  52. _GetPubScrList:
  53.     move.l    _ScrSharBase,a6
  54.     jmp    _LVOGetPubScrList(a6)
  55.  
  56.