home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d5xx / d556 / asmonedemo.lha / ASMOneDemo / ASMOneDemo.lzh / ASM-One / Include.Strip / exec / libraries.i < prev    next >
Text File  |  1991-10-17  |  976b  |  59 lines
  1.     IFND    EXEC_LIBRARIES_I
  2. EXEC_LIBRARIES_I    SET    1
  3.     IFND    EXEC_NODES_I
  4.     INCLUDE    "exec/nodes.i"
  5.     ENDC
  6. LIB_VECTSIZE    EQU    6
  7. LIB_RESERVED    EQU    4
  8. LIB_BASE    EQU    $FFFFFFFA
  9. LIB_USERDEF    EQU    LIB_BASE-(LIB_RESERVED*LIB_VECTSIZE)
  10. LIB_NONSTD    EQU    LIB_USERDEF
  11. LIBINIT    MACRO    *
  12.     IFC    '\1',''
  13. COUNT_LIB    SET    LIB_USERDEF
  14.     ENDC
  15.     IFNC    '\1',''
  16. COUNT_LIB    SET    \1
  17.     ENDC
  18.     ENDM
  19. LIBDEF    MACRO    *
  20. \1    EQU    COUNT_LIB
  21. COUNT_LIB    SET    COUNT_LIB-LIB_VECTSIZE
  22.     ENDM
  23.     LIBINIT    LIB_BASE
  24.     LIBDEF    LIB_OPEN
  25.     LIBDEF    LIB_CLOSE
  26.     LIBDEF    LIB_EXPUNGE
  27.     LIBDEF    LIB_EXTFUNC
  28.     STRUCTURE    LIB,LN_SIZE
  29.     UBYTE    LIB_FLAGS
  30.     UBYTE    LIB_pad
  31.     UWORD    LIB_NEGSIZE
  32.     UWORD    LIB_POSSIZE
  33.     UWORD    LIB_VERSION
  34.     UWORD    LIB_REVISION
  35.     APTR    LIB_IDSTRING
  36.     ULONG    LIB_SUM
  37.     UWORD    LIB_OPENCNT
  38.     LABEL    LIB_SIZE
  39.     BITDEF    LIB,SUMMING,0
  40.     BITDEF    LIB,CHANGED,1
  41.     BITDEF    LIB,SUMUSED,2
  42.     BITDEF    LIB,DELEXP,3
  43. CALLLIB    MACRO    *
  44.     IFGT    NARG-1
  45.     FAIL    !!!
  46.     ENDC
  47.     JSR    \1(A6)
  48.     ENDM
  49. LINKLIB    MACRO    *
  50.     IFGT    NARG-2
  51.     FAIL    !!!
  52.     ENDC
  53.     MOVE.L    A6,-(SP)
  54.     MOVE.L    \2,A6
  55.     CALLLIB    \1
  56.     MOVE.L    (SP)+,A6
  57.     ENDM
  58.     ENDC
  59.