Lines Matching refs:alloc

103    /fs-fcode  mem-alloc                   ( adr  r: ih )
159 : vmem-alloc-prop  ( size virt -- alloc-size virt )
160    2dup  ['] vmem-alloc  catch  if            ( size virt ??? ??? )
163          over 32meg  min  >r                  ( size virt len adr  r: alloc-sz )
164          r@ over  vmem-alloc                  ( size virt len adr adr  r: alloc-sz )
165          nip  r@ +                            ( size virt len adr'  r: alloc-sz )
172    then                                       ( virt alloc-sz )
195 \ if base==0, vmem-alloc will allocate virt
198 : get-file ( base fd -- [ alloc-sz virt size ] failed? )
200    dup rot  vmem-alloc-prop                ( size alloc-sz virt  r: fd )
201    rot  2dup                               ( alloc-sz virt size virt size  r: fd )
202    r>  read-file  if                       ( alloc-sz virt size )
205    h# 2000  roundup                        ( alloc-sz virt size' )
206    false                                   ( alloc-sz virt size' succeeded )
523 0 value rd-alloc-sz
556    /rd-fcode mem-alloc                ( base size adr )
571    rd-alloc-sz                     ( base size alloc-sz  r: ih )
602 \ alloc 4MB pages for kernel text/data
603 : vmem-alloc-4mb  ( size virt -- base )
605    4meg (mem-alloc)
621             p_memsz p_vaddr  vmem-alloc  drop
623             p_memsz p_vaddr  vmem-alloc-4mb  drop
633    loader-base over  get-file  if   ( fd alloc-sz virt size )
636    to file-sz                       ( fd alloc-sz virt )
637    swap  to rd-alloc-sz             ( fd virt )