Mercurial > hg > octave-nkf
comparison scripts/gui/private/__get_funcname__.m @ 20038:9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Try to trim long lines to < 80 chars.
Use '##' for single line comments.
Use '(...)' around tests for if/elseif/switch/while.
Abut cell indexing operator '{' next to variable.
Abut array indexing operator '(' next to variable.
Use space between negation operator '!' and following expression.
Use two newlines between endfunction and start of %!test or %!demo code.
Remove unnecessary parens grouping between short-circuit operators.
Remove stray extra spaces (typos) between variables and assignment operators.
Remove stray extra spaces from ends of lines.
author | Rik <rik@octave.org> |
---|---|
date | Mon, 23 Feb 2015 14:54:39 -0800 |
parents | 4197fc428c7d |
children | 781adfc2958c |
comparison
equal
deleted
inserted
replaced
20037:a1acca0c2216 | 20038:9fc020886ae9 |
---|---|
29 function funcname = __get_funcname__ (basename) | 29 function funcname = __get_funcname__ (basename) |
30 | 30 |
31 if (! __octave_link_enabled__ ()) | 31 if (! __octave_link_enabled__ ()) |
32 tk = graphics_toolkit (); | 32 tk = graphics_toolkit (); |
33 funcname = strcat ("__", basename, "_", tk, "__"); | 33 funcname = strcat ("__", basename, "_", tk, "__"); |
34 if ((numel (tk) > 0) && (! strcmp(tk, "fltk")) && (! __is_function__ (funcname))) | 34 if (numel (tk) > 0 && ! strcmp (tk, "fltk") |
35 warning ("%s: no implementation for toolkit '%s', using 'fltk' instead",basename, tk); | 35 && ! __is_function__ (funcname))) |
36 warning ("%s: no implementation for toolkit '%s', using 'fltk' instead", | |
37 basename, tk); | |
36 endif | 38 endif |
37 funcname = strcat ("__", basename, "_fltk__"); | 39 funcname = strcat ("__", basename, "_fltk__"); |
38 else | 40 else |
39 funcname = ""; | 41 funcname = ""; |
40 endif | 42 endif |