* function: hma_alloc()
*
* description:  Have the driver assign the High Memory Area to us.
*    Returns TRUE if the driver do so, FALSE otherwise.
*
* Note:  If you use this and your program is a TSR or device driver,
*    add a parameter so that you may pass DX as the space needed in bytes
*    instead of 0xFFFF.
*-------------------------------------------------------------------------
FUNCTION LOGICAL hma_alloc

   VARDEF
      UINT  ax,bx,cx,dx,ds,si,es,di,bp
   ENDDEF

   ax = &XMS_GET_HMA
   dx = 0xFFFF
   call_driver( xms_get_driver(), ax, bx, cx, dx, si, di, bp, ds, es)
   xms_set_error( ax, bx )

   if ax = 1
      return &TRUE
   endif

   return &FALSE

ENDPRO