NOLIST
AvailMem    MACRO              ; 11 Jan 88
*------------------------------; Start of AvailMem macro.
     NOLIST
     IFEQ NARG                 ; If \1 is not given, then
     LIST
     CLR.L D1                  ; Accept any available memory.
     NOLIST
     ENDC
     IFEQ NARG-1               ; If \1 is given, then
PUBLIC SET 1
CHIP   SET 2
FAST   SET 4
     LIST
     MOVE.L #\1,D1             ; Set the appropriate bits in D1.
     NOLIST
     ENDC
     LIST
     CallLib AvailMem,exec     ; Call AvailMem.
*------------------------------; End of AvailMem macro.
     ENDM
     LIST