include vmem.i
  section .text,text
  public alloc_pages
alloc_pages:
  move.l d2, -(a7)
  move.l #0, d1
  move.l #$2, d2
  jsr vmem_map_free
alloc_pages_done:
  move.l (a7)+, d2
  rts