Subject: [clisp-list] adjustable arrays

From: "Justice, Randy -CONT" <[email-masked]>
Date: Tue, 6 Feb 2001 11:30:54 -0600

Hi,

Can someone help me...
I'm trying to do adjustable array..

(let ((sum 0)
      (array-length ( - (array-dimension txy 0 ) 1))
      (cellminarray (make-array '(0 0) :adjustable ));; End of Make-array 
     ) 
 
  (setq cellminarray (adjust-array cellminarray '(4 4)))

I think the error is in line: (cellminarray (make-array '(0 0) :adjustable
));; End of Make-array 

I get *** - EVAL/APPLY: keyword arguments for #<SYSTEM-FUNCTION MAKE-ARRAY>
should occur pairwise

Thanks for any help

Randy

---

From: Pierpaolo BERNARDI <[email-masked]>
Date: Tue, 6 Feb 2001 18:37:28 +0100 (MET)

>       (cellminarray (make-array '(0 0) :adjustable ));; End of Make-array 

Use:  ...   :adjustable t)) ...

P.

---

From: "Justice, Randy -CONT" <[email-masked]>
Date: Tue, 6 Feb 2001 11:51:50 -0600

Thanks for you help...

Randy

-----Original Message-----
From: Pierpaolo BERNARDI [mailto:[email-masked]]
Sent: Tuesday, February 06, 2001 11:37 AM
To: Justice, Randy -CONT
Cc: [email-masked]
Subject: Re: [clisp-list] adjustable arrays

P.

_______________________________________________
clisp-list mailing list
[email-masked]
http://lists.sourceforge.net/lists/listinfo/clisp-list