Changeset 10039


Ignore:
Timestamp:
Jul 15, 2008, 1:25:50 PM (11 years ago)
Author:
gb
Message:

natural stack sizes.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/win64/lisp-kernel/pmcl-kernel.c

    r9652 r10039  
    220220
    221221BytePtr
    222 allocate_lisp_stack(unsigned useable,
     222allocate_lisp_stack(natural useable,
    223223                    unsigned softsize,
    224224                    unsigned hardsize,
     
    230230                    protected_area_ptr *hardp)
    231231{
    232   void *allocate_stack(unsigned);
     232  void *allocate_stack(natural);
    233233  void free_stack(void *);
    234234  natural size = useable+softsize+hardsize;
     
    279279area *
    280280allocate_lisp_stack_area(area_code stack_type,
    281                          unsigned useable,
     281                         natural usable,
    282282                         unsigned softsize,
    283283                         unsigned hardsize,
     
    291291  protected_area_ptr soft_area=NULL, hard_area=NULL;
    292292
    293   bottom = allocate_lisp_stack(useable,
     293  bottom = allocate_lisp_stack(usable,
    294294                               softsize,
    295295                               hardsize,
     
    332332
    333333area*
    334 allocate_vstack_holding_area_lock(unsigned usable)
     334allocate_vstack_holding_area_lock(natural usable)
    335335{
    336336  return allocate_lisp_stack_area(AREA_VSTACK,
     
    344344
    345345area *
    346 allocate_tstack_holding_area_lock(unsigned usable)
     346allocate_tstack_holding_area_lock(natural usable)
    347347{
    348348  return allocate_lisp_stack_area(AREA_TSTACK,
Note: See TracChangeset for help on using the changeset viewer.