annotate general/tostring.m @ 4:e44f49929e56
Adding reorganised general toolbox, now in several subdirectories.
author |
samer |
date |
Sat, 12 Jan 2013 19:21:22 +0000 |
parents |
|
children |
47cb292350f3 |
rev |
line source |
samer@4
|
1 function s=tostring(varargin)
|
samer@4
|
2 % tostring - Tries to represent values as a sensible string
|
samer@4
|
3 %
|
samer@4
|
4 % tostring :: A -> string.
|
samer@4
|
5 % tostring :: A, B -> string.
|
samer@4
|
6 % etc.
|
samer@4
|
7 %
|
samer@4
|
8 % Multiple inputs are converted to comma-separated string.
|
samer@4
|
9 s=cat_sep(',',map(@tostr,varargin));
|
samer@4
|
10
|
samer@4
|
11 function s=tostr(x)
|
samer@4
|
12 if ischar(x), s=x;
|
samer@4
|
13 elseif isnumeric(x),
|
samer@4
|
14 sz=size(x);
|
samer@4
|
15 if prod(sz)<16, s=mat2str(x);
|
samer@4
|
16 else s=sprintf('%s[%s]',class(x),mat2str(sz)); end
|
samer@4
|
17 elseif isa(x,'function_handle'), s=func2str(x);
|
samer@4
|
18 if s(1)~='@', s=['@' s]; end
|
samer@4
|
19 elseif isa(x,'func'), s=tostring(x);
|
samer@4
|
20 else s=['obj:' class(x)];
|
samer@4
|
21 end
|
samer@4
|
22
|