Menu: Difference between revisions

No change in size ,  14 years ago
(bug fix)
Line 153:
=={{header|J}}==
 
<lang J>select=: ({::~ 'choose a number 0..' 0_&".@prompt@, ': ',~ ":@<:@# [ i.@# smoutput@,&":&> ' '&,&.>) :: (select@([ smoutput bind 'please choose a valid number'))</lang>
 
Example use:
6,962

edits