Mercurial > octave

view test/bug-53599.tst @ 32103:32313c5e1bfc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Don't use 2-digit exponent format for ticklabels when unnecessary. * graphics.cc (calc_ticklabels): New boolean variable is_2digit_exp. Cycle through ticklabel values using log10 to determine if maximum exponent is greater than or equal to 10. As soon as this condition is found set is_2digit_exp to true and break out of loop. Within ticklabel formatting loop, only print leading '0' if is_2digit_exp is true and the current exponent to be printed is less than 10.
author Rik <rik@octave.org>
date Wed, 31 May 2023 10:44:35 -0700
parents 332a6ccac881
children
line wrap: on
line source

%!function rval = sggval (val)
%!  global gval;
%!  if (nargin == 1)
%!    gval = val;
%!  else
%!    rval = gval;
%!  endif
%!endfunction

%!test <*53599>
%! global gval;
%! assert (isempty (gval))
%! sggval (13);
%! assert (sggval (), 13);
%! assert (gval, 13);
%! clear global gval
%! assert (sggval (), [])
%! gval = 42;
%! assert (sggval (), []);
%! clear gval
%! global gval;
%! gval = 42;
%! assert (sggval (), 42);
%! clear -global gval;  # cleanup after test