Mercurial > octave-nkf
changeset 19079:920a400929ca
* isprime.m: Return an empty array for empty input
| author | Jordi Gutiérrez Hermoso <jordigh@octave.org> |
|---|---|
| date | Sat, 23 Aug 2014 17:38:56 -0400 |
| parents | 4c59f69fa52c |
| children | 89e275a4f6f6 |
| files | scripts/specfun/isprime.m |
| diffstat | 1 files changed, 5 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/specfun/isprime.m Sat Aug 23 16:12:03 2014 +0200 +++ b/scripts/specfun/isprime.m Sat Aug 23 17:38:56 2014 -0400 @@ -43,6 +43,11 @@ error ("isprime: X must be a non-negative integer"); endif + if (isempty (x)) + t = x; + return; + endif + maxn = max (x(:)); ## generate prime table of suitable length. maxp = min (maxn, max (sqrt (maxn), 1e7)); # FIXME: threshold not optimized.