Hi, I have forgotten...
Thanks a lot. Cheers, Greg > -----Message d'origine----- > De : Camm Maguire [mailto:[EMAIL PROTECTED] > Envoy� : vendredi 3 juin 2005 17:59 > � : Vanuxem Gr�gory > Cc : [email protected] > 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 <[EMAIL PROTECTED]> 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 > > [email protected] > > http://lists.gnu.org/mailman/listinfo/gcl-devel > > > > > > > > -- > Camm Maguire [EMAIL PROTECTED] > ========================================================================== > "The earth is but one country, and mankind its citizens." -- Baha'u'llah > _______________________________________________ Gcl-devel mailing list [email protected] http://lists.gnu.org/mailman/listinfo/gcl-devel
