RE: [Gcl-devel] clines and dgemm

[Vanuxem Grégory]

Hi,

I have forgotten...

Thanks a lot.

Cheers,

Greg

> -----Message d'origine-----
> De : Camm Maguire [mailto:address@hidden
> Envoyé : vendredi 3 juin 2005 17:59
> À : Vanuxem Grégory
> Cc : address@hidden
> Objet : Re: [Gcl-devel] clines and dgemm
>
>
> Greetings!
>
> ==================================================================
> ===========
> (clines "
> object
> array_staticp(object x) {
>    return x->a.a_self < heap_end ? Ct : Cnil;
> }
> ")
>
> (defentry %array-staticp (object) (object "array_staticp"))
>
> (defun array-staticp (x) (and (arrayp x) (%array-staticp x)))
> ==================================================================
> ===========
>
> >(compile-file "/tmp/y.l")
>
> Compiling /tmp/y.l.
> End of Pass 1.
> End of Pass 2.
> OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
> Finished compiling /tmp/y.l.
> #p"/tmp/y.o"
>
> >(load "/tmp/y.o")
>
> Loading /tmp/y.o
> start address -T 0x4da528 Finished loading /tmp/y.o
> 744
>
> >(array-staticp (make-array 10))
>
> NIL
>
> >(array-staticp (make-array 10 :static t))
>
> T
>
> >
> ==================================================================
> ===========
>
> But perhaps we need a standard function.
>
> Would you like to volunteer to contibute a blas and or lapack
> interface along the lines above to GCL proper?
>
> Take care,
>
> Vanuxem Grégory <address@hidden> writes:
>
> > Hi,
> >
> >
> > > Work with:
> > >
> > > (make-array *******  :static t)
> >
> > How can I know if an array is static
> > (contiguous memory) ?
> >
> > Cheers,
> >
> >
> > Greg
> >
> >
> >
> >
> >
> > _______________________________________________
> > Gcl-devel mailing list
> > address@hidden
> > http://lists.gnu.org/mailman/listinfo/gcl-devel
> >
> >
> >
>
> --
> Camm Maguire                                          address@hidden
> ==========================================================================
> "The earth is but one country, and mankind its citizens."  --  Baha'u'llah
>