Create a two-dimensional array at runtime: Difference between revisions

Content added Content deleted
(+ Forth)
Line 109: Line 109:


The <code>[http://www.lispworks.com/documentation/HyperSpec/Body/m_assert.htm assert]</code> will allow the user to reenter the dimensions if they are not positive integers.
The <code>[http://www.lispworks.com/documentation/HyperSpec/Body/m_assert.htm assert]</code> will allow the user to reenter the dimensions if they are not positive integers.

==[[Forth]]==
[[Category:Forth]]

: cell-matrix
create ( width height "name" ) over , * cells allot
does> ( x y -- addr ) dup cell+ >r @ * + cells r> + ;

5 5 cell-matrix test

36 0 0 test !
0 0 test @ . \ 36


==[[Java]]==
==[[Java]]==