规范Matlab代码

最新推荐文章于 2021-03-24 08:38:04 发布

酱油队长

最新推荐文章于 2021-03-24 08:38:04 发布

阅读量259

点赞数

分类专栏： Matlab

本文链接：https://blog.csdn.net/u010430222/article/details/115147690

版权

Matlab 代码格式化代码美化编程规范自动格式化

关键词由CSDN通过智能技术生成

Matlab 专栏收录该内容

2 篇文章 0 订阅

订阅专栏

以下程序用于规范Matlab代码，仅为备用。
原作者：打浦桥程序员

function formatMcode
  try %#ok
    document = matlab.desktop.editor.getActive;
    position = document.Selection;
    document.Text = format(document.Text);
    document.goToPositionInLine(position(1), position(2)) % 还原光标位置
    document.smartIndentContents();
  end
  
function code = format(code)
  code = regexprep(code, {'(\S)[ \f\v\t]+\n', '([^\n])$'}, '$1\n');
  tree = mtree(code, '-comments');
  assert(isempty(tree.mtfind('Kind', 'ERR')))
  
  % a(:) 不替换为 a( : )
  colons = tree.mtfind('Kind', 'COLON');
  colonPos = colons.position();
  colonPos = colonPos(colons.lefttreepos == colons.righttreepos);
  
  % 字符串、注释、数值中的符号以及一元操作符不处理
  exc = tree.mtfind('Kind', 'CHARVECTOR') | tree.mtfind('Kind', 'STRING') | ...
    tree.mtfind('Kind', 'DOUBLE') | tree.mtfind('Kind', 'COMMENT') | ...
    tree.mtfind('Kind', 'UPLUS') | tree.mtfind('Kind', 'UMINUS');
  excPos = [colonPos' ...
    cell2mat(arrayfun(@colon, exc.lefttreepos, exc.righttreepos, 'un', 0)')];
  
  [ops, code, start] = regexp(string(code), ...
    '(\.(\^|\*|/|\\)|<=|>=|==|~=|&&|\|\||\+|\-|\*|\\|/|\^|\||&|<|>|=|,|;|:)', ...
    'match', 'split', 'start');
  idx = ~ismember(start, excPos);
  code(idx) = regexprep(code(idx), '[ \f\r\t\v]+$', '');
  code([false idx]) = regexprep(code([false idx]), '^[ \f\r\t\v]+', '');
  
  ops(idx) = ops(idx) + " ";
  idx = idx & ~ops.startsWith(["," ";"]);
  ops(idx) = " " + ops(idx);
  code = char(strjoin([code; ops ""], ''));