Mercurial > octave

comparison scripts/legacy/__vectorize__.m @ 31548:c8ad083a5802 stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Clean up m-files before Octave 8.1 release. * external.txi, oop.txi, Table.h, documentation.cc, gui-preferences-ed.h, lo-specfun.cc, range.tst : Eliminate triple newlines. * Map.m, MemoizedFunction.m, delaunayn.m, inputParser.m, __publish_latex_output__.m, publish.m, unpack.m, fminbnd.m, __add_default_menu__.m, gammainc.m, gallery.m, hadamard.m, weboptions.m: Add newline after keyword "function" or before keyword "endfunction" for readability. * getaudiodata.m, pkg.m : Add semicolon to end of line for error() statement. * movegui.m: Combine mutliple calls to set() into one for performance. * __unimplemented__.m (missing_functions): Remove missing functions that have been implemented. * __vectorize__.m, check_default_input.m, betaincinv.m, gammaincinv.m: Remove semicolon at end of line with "function" declaration. * weboptions.m: Remove semicolon at end of line with "if" keyword. * integrate_adaptive.m, factor.m: Use keyword "endif" rather than bare "end".
author Rik <rik@octave.org>
date Fri, 25 Nov 2022 21:23:54 -0800
parents b7edac56a810
children 597f3ee61a48
comparison
equal deleted inserted replaced
31541:fd8c0df759bb 31548:c8ad083a5802
31 ## The following function was translated directly from the original C++ 31 ## The following function was translated directly from the original C++
32 ## version. Yes, it will be slow, but its use is strongly discouraged 32 ## version. Yes, it will be slow, but its use is strongly discouraged
33 ## anyway, and most expressions will probably be short. It may also be 33 ## anyway, and most expressions will probably be short. It may also be
34 ## buggy. Well, don't use this function! 34 ## buggy. Well, don't use this function!
35 35
36 function new_expr = __vectorize__ (expr); 36 function new_expr = __vectorize__ (expr)
37 37
38 new_expr = ""; 38 new_expr = "";
39 39
40 len = length (expr); 40 len = length (expr);
41 i = 1; 41 i = 1;