Text only | Text with Images

newLISP Fan Club

Forum => Anything else we might add? => Topic started by: didi on May 07, 2007, 10:13:08 AM

Title: arrays
Post by: didi on May 07, 2007, 10:13:08 AM
To initialize a big array with a certain value   this is the only method i found :



( set 'pic  ( array 100 100 ( sequence 3 3 ) ) )





1. Is there any other method  to initialize it to a certain number  or a string ?



2. How can i stop the  output  in the console-window while the array

is evaluated ?



PS: As you can imagine i want this for a byte-map for simple graphics  .  The size could  be eg.  1000 x 1000  later .
Title:
Post by: Jeff on May 07, 2007, 10:53:40 AM
You could just do:


Code Select
(set 'pic (array 100 100 '(3)))
Title:
Post by: didi on May 07, 2007, 11:00:14 AM
It works . Thankyou Jeff .  

And how can i get rid of the display of the hole array in the console-window ?
Title:
Post by: Jeff on May 07, 2007, 11:06:40 AM
In the repl (the interactive interpreter), whatever the last expression evaluates to gets printed to the screen (repl = read-eval-print-loop).  I don't think it outputs anything when run from the cli.
Title:
Post by: Lutz on May 07, 2007, 11:38:13 AM
to get rid of displaying the return value from the array statement, just wrap any other functin around it:


Code Select
(time (set 'pic (array 100 100 '(3))))

of course this is only a problem when executing the statement interactively. Inside a program you wouldn't see anything which isn't printed explictely.



or you can use 'silent':


Code Select
(silent (set 'pic (array 100 100 '(3))))

it suppresses everything, including the prompt, so hit <enter> to get the prompt back.



Lutz



see also: http://newlisp.org/downloads/newlisp_manual.html#array
Text only | Text with Images