title: Reading numbers to array from string
body: <blockquote>
  <p>i create static array, suggest would good for finding numbers in string for array size</p>
  </blockquote>
  <pre><code>(setf arr (make-array'(5))) 
  
  (loop for i from 0 to 4
    do (if (/= nil (read-from-string str)) 
           (setq x (read-from-string str t nil :start i))
           (setf (aref arr i) x))))
  </code></pre>
  <blockquote>
  <p>i want to go until end of string</p>
  </blockquote>