src/plugins/matlab/code/struct2bullet.m

   1 function tmp=struct2bullet(n,c)
   2
   3         if (c==1)
   4                 tmp='(itemize-arrow (document ';
   5         else
   6                 tmp='(itemize (document ';
   7         end
   8
   9         FIELDS=fieldnames(n);
  10         for i=1:length(FIELDS)
  11                 key=char(FIELDS(i));
  12                 val=getfield(n,key);
  13                 switch (typeinfo(val))
  14                         case ('struct')
  15                                 tmp1=['(concat (item) (with "color" "', 'black', '" "', key, ' = ") ', struct2bullet(val,c+1),')'];
  16                         otherwise
  17                                 tmp1=['(concat (item) (with "color" "', 'black', '" "', key, ' = ") ', obj2scm(val),')'];
  18                 end
  19                 tmp=[tmp,tmp1];
  20         end
  21         tmp=[tmp,'))'];