规范Matlab代码

以下程序用于规范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)[ fvt]+n', '([^n])$'}, '$1n');
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), '[ frtv]+$', '');
code([false idx]) = regexprep(code([false idx]), '^[ frtv]+', '');
ops(idx) = ops(idx) + " ";
idx = idx & ~ops.startsWith(["," ";"]);
ops(idx) = " " + ops(idx);
code = char(strjoin([code; ops ""], ''));

最后

以上就是成就荷花最近收集整理的关于规范Matlab代码的全部内容，更多相关规范Matlab代码内容请搜索靠谱客的其他文章。