Mercurial > octave-nkf

comparison scripts/general/isa.m @ 10549:95c3e38098bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Untabify .m scripts
author Rik <code@nomad.inbox5.com>
date Fri, 23 Apr 2010 11:28:50 -0700
parents 16f53d29049f
children 0d9640d755b1
comparison
equal deleted inserted replaced
10548:479536c5bb10 10549:95c3e38098bf
31 endif 31 endif
32 32
33 persistent float_classes = {"double", "single"}; 33 persistent float_classes = {"double", "single"};
34 34
35 persistent fnum_classes = {"double", "single", ... 35 persistent fnum_classes = {"double", "single", ...
36 "uint8", "uint16", "uint32", "uint64", ... 36 "uint8", "uint16", "uint32", "uint64", ...
37 "int8", "int16", "int32", "int64"}; 37 "int8", "int16", "int32", "int64"};
38 38
39 if (strcmp (cname, "float")) 39 if (strcmp (cname, "float"))
40 retval = any (strcmp (class (x), float_classes)); 40 retval = any (strcmp (class (x), float_classes));
41 elseif (strcmp (cname, "numeric")) 41 elseif (strcmp (cname, "numeric"))
42 retval = any (strcmp (class (x), fnum_classes)); 42 retval = any (strcmp (class (x), fnum_classes));