Re: [Gcl-devel] GCL stack size

[Camm Maguire]

Hi Vadim!  Do you still get this strange result with your propsed
patch, or does that work supercede this note?

Take care,

"Vadim V. Zhytnikov" <address@hidden> writes:

> I've been playing with stack size in GCL and got some
> strange result. For test purpose I enlarged both IHS and FRS
> stack to 8K or 16K items both.  But if I start some infinite
> recursion function like one below the executions
> stops at 5450 level with "value stack exhausted".
> I've tried to enlarge VSSIZE using --enable-vssize=64*1024
> but nothing changed - test still stops at 5450.
> It's very strange since smaller value --enable-vssize=16*1024
> works - execution stops at ~2700.  This is OK since default
> value is 32K (not in stacks.h but defined by configure),
> so ~2700 is expectable.
> 
> Camm Maguire writes:
> > Hi Vadim!  First, do you feel this is related to my earlier request
> > for suggestions on our gbc setup?  Or is this a separate concern?
> > In any case, here is stacks.h with my comments:
> > #ifndef MAXPAGE  /* total memory */
> > #define MAXPAGE (32 * 1024)
> > #endif
> > #ifndef VSSIZE  /* value stack size, configurable, default below */
> > #define VSSIZE 8192
> > #endif
> > #define VSGETA 128 /* emergency extra stack space available to a
> >                         running program */
> > EXTER object value_stack[VSSIZE + (STACK_OVER +1) *VSGETA];
> > #define BDSSIZE             1024  /* variable dynamic binding stack
> >                                 globals can have different bindings in
> >                                 nested functions */
> > #define     BDSGETA         40
> > EXTER struct bds_bd bind_stack[BDSSIZE + (STACK_OVER +1)* BDSGETA];
> >      /*  #define    IHSSIZE         1024 */
> > /*  #define IHSGETA         32 */
> > #define     IHSSIZE         4096 /* a stack listing the name and base
> >                                 address of parent function calls */
> > #define     IHSGETA         64
> > EXTER struct invocation_history ihs_stack[IHSSIZE + (STACK_OVER +1)
> > * IHSGETA];     #define FRSSIZE             1024 /* a stack
> > providing debugging
> >                                 information for  function calls in
> >                                 interpreted and possibly compiled
> >                                 code, i.e. addresses for interactively
> >                                 long jumping back to a particular parent 
> > call, etc. */
> > #define     FRSGETA         16
> > EXTER struct frame frame_stack[FRSSIZE + (STACK_OVER +1) * FRSGETA];
> > Suggestions for default values, and/or which should be configurable,
> > are welcome.  My feeling is that frs and ihs should be the same size.
> > Take care,
> > "Vadim V. Zhytnikov" <address@hidden> writes:
> >
> >>It seems to me that current dfault stack size
> >>is too little.  I recall thet it was enlarged
> >>to 1K not so long ago and now if I fire
> >>  (defun f (i) (f (print (+ i 1))))
> >>  (f 0)
> >>we end with 1021.  But IMHO it is not
> >>that much.  I found out that in
> >>CLISP, SBCL and CMUCL minimal stack
> >>size is much greater - minimal about 14K.
> >>Even ACL demo has 4K stach limit - but
> >>this is intended demo limitation.
> >>Ideally I'd like to see stack size as
> >>GCL configure option.  As far as I
> >>understand stack size is defined in
> >>stack.h but I a bit confused by
> >>multitude of constants in this file.
> >>
> >> -- 
> >>      Vadim V. Zhytnikov
> >>
> >>       <address@hidden>
> >>      <address@hidden>
> >>
> >>
> >>
> >>
> >>
> >>_______________________________________________
> >>Gcl-devel mailing list
> >>address@hidden
> >>http://mail.gnu.org/mailman/listinfo/gcl-devel
> >>
> >>
> >>
> >
> 
> 
> -- 
>       Vadim V. Zhytnikov
> 
>        <address@hidden>
>       <address@hidden>
> 
> 
> 
> 
> 
> 
> 

-- 
Camm Maguire                                            address@hidden
==========================================================================
"The earth is but one country, and mankind its citizens."  --  Baha'u'llah