Re: [Gcl-devel] Windows - Instability in universe.lsp

[Camm Maguire]

Greetings!  OK

p pp(p->p.p_name)
frame 2
p pp(form)
frame 3
p pp(form)
frame 5
p pp(form
frame 7
p pp(form)

Can't yet reproduce your place in the stack.

Take care,

"Mike Thomas" <address@hidden> writes:

> Hi again.
> 
> | Yep, this is bad.  Please do
> | 
> | p ip
> | p *ip
> | p l
> | p l->d
> | p l->c
> | p st->st
> | p p->p
> 
> 0x00452c1a in intern (st=0x103fca80, p=0x651a90) at package.d:401
> 401             for (l = *ip;  type_of(l) == t_cons;  l = l->c.c_cdr)
> (gdb) p ip
> $1 = (object *) 0x651a90
> (gdb) p *ip
> $2 = 0x8
> (gdb) p l
> $3 = 0x8
> (gdb) p l->id
> There is no member named id.
> (gdb) p l->d
> Cannot access memory at address 0x8
> (gdb) p l->c
> Cannot access memory at address 0x8
> (gdb) p st->st
> $4 = {t = 13 '\r', flag = 0 '\0', s = 0 '\0', m = 0 '\0',
>   st_displaced = 0x651a90, st_hasfillp = 0, st_adjustable = 0,
>   st_self = 0x13847f34 "a", st_fillp = 1, st_dim = 1}
> (gdb) p p->p
> $5 = {t = 8 '\b', flag = 0 '\0', s = 0 '\0', m = 0 '\0', p_name = 0x651a90,
>   p_nicknames = 0x651a90, p_shadowings = 0x6253c8, p_uselist = 0x3,
>   p_usedbylist = 0x0, p_internal = 0x651a90, p_external = 0x10103fa4,
>   p_internal_size = 1, p_external_size = 0, p_internal_fp = 0,
>   p_external_fp = 0, p_link = 0x101062ac}
> (gdb) bt
> #0  0x00452c1a in intern (st=0x103fca80, p=0x651a90) at package.d:401
> #1  0x00454608 in Lintern () at package.d:870
> #2  0x0041f487 in eval (form=0x651a90) at eval.c:1090
> #3  0x0041f40a in eval (form=0x102e26a8) at eval.c:1077
> #4  0x0041ed84 in Ieval (form=0x102e269c) at eval.c:928
> #5  0x0040d506 in Fsetq (form=0x102e2570) at assignment.c:100
> #6  0x0041f217 in eval (form=0x102e257c) at eval.c:1037
> #7  0x0046175a in Fprogn (body=0x102e251c) at prog.c:248
> #8  0x0041f217 in eval (form=0x102e2534) at eval.c:1037
> #9  0x0041f981 in fLeval (x0=0x102e315c) at eval.c:1178
> #10 0x00431dc6 in c_apply_n (fn=0x41f925 <fLeval>, n=1, x=0x6c1488)
>     at funlink.c:363
> #11 0x0044aa7b in IapplyVector (fun=0x10107e24, nargs=1, base=0x6c1488)
>     at nfunlink.c:229
> #12 0x0041d5b7 in funcall (fun=0x10107e24) at eval.c:190
> #13 0x0041e57f in symlispcall (sym=0x10109ad4, base=0x6c1484, narg=1)
>     at eval.c:507
> #14 0x0060ef1a in LI1 () at gcl_top.c:140
> #15 0x0041ca1c in quick_call_sfun (fun=0x10131fdc) at eval.c:117
> #16 0x0041d533 in funcall (fun=0x10131fdc) at eval.c:178
> #17 0x0044abbc in IapplyVector (fun=0x10131fdc, nargs=0, base=0x6c145c)
>     at nfunlink.c:239
> #18 0x0041f703 in fLfuncall (fun=0x10131fdc) at eval.c:1140
> ---Type <return> to continue, or q <return> to quit---
> 
> Cheers
> 
> Mike Thomas. 
> 
> 
> 
> 

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