Re: [Chicken-users] display function that shows sharing

[Kon Lovett]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1


On Apr 27, 2007, at 1:19 PM, address@hidden wrote:

> Thanks Kon for your answers.
>
> Fri, 27 Apr 2007 13:01:53 -0700, klovett wrote:
> > On Apr 27, 2007, at 12:37 PM, address@hidden wrote:
> >
> > > Hi all.
> > >
> > > Does chicken have a function that shows sharing in s-exps?
> > > SRFI-38 can do this:
> > > > (use srfi-38)
> > > > (define a '(1 2))
> > > > (define b (list a a))
> > > > (write-with-shared-structure b)
> > > (#1=(1 2) #1#)
> > >
> > > The problem with SRFI-38 is that I don't want too see sharing
> > > between strings!
> > > So, is there a parameter for SRFI-38?
> > > Or is there a more adequate function in Chicken? (like display- 
> > > circle
> > > in bigloo)
> >
> > Not that I know of. But take a look at "testbase-support.scm" in the
> > testbase egg. There is a function 'proper-object?' which does what
> > you want.
>
> If I understand the code correctly, this is just a test function, and
> not a output function.
> But I really have to see the sharing between lists etc. (except  
> strings).

You are correct, a predicate. Sorry I misunderstood the "shows  
sharing" above as determines sharing.

Be nice if someone (hint, hint) extended SRFI-38 to handle all  
heterogeneous structures & ignored sharing of a caller specified set  
of types (such as 'string?').

Good Luck,
Kon

> Ciao
> Sven
> _______________________________________________
> Chicken-users mailing list
> address@hidden
> http://lists.nongnu.org/mailman/listinfo/chicken-users

Best Wishes,
Kon


-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.5 (Darwin)

iEYEARECAAYFAkYyXLkACgkQJJNoeGe+5O60lACfb40wVI5+CuZNXASgwZazSYwo
AEkAnRinCJ4cc6bcsbGEVNFciKOfCRES
=JIgA
-----END PGP SIGNATURE-----