Mercurial > octave-nkf
view test/octave.test/string/isdigit-1.m @ 5103:e2ed74b9bfa0 after-gnuplot-split
[project @ 2004-12-28 02:43:01 by jwe]
author | jwe |
---|---|
date | Tue, 28 Dec 2004 02:43:01 +0000 |
parents | 38463e268d55 |
children |
line wrap: on
line source
charset = setstr (0:127); result = zeros (1, 128); result ((toascii("0"):toascii("9"))+1) = 1; all (isdigit (charset) == result)