Mercurial > octave
view libinterp/corefcn/mk-errno-list.sh @ 33571:742d8fc77688 default tip @
Support setting breakpoints in get and set methods of classdef properties (bug #65610).
* cdef-class.cc (cdef_class::cdef_class_rep::get_method): Also check for any
`get` or `set` methods of `classdef` properties.
* bp-table.cc (user_code_provider::operator ()): Support getting (closest) user
code to `get` or `set` methods of `classdef` classes.
(user_code_provider::populate_function_cache): Add `get` and `set` methods to
function cache for `classdef` classes.
* pt-eval.cc (tree_evaluator::get_user_code): Support getting user code for
`get` or `set` methods of `classdef` properties.
* test/classdef-debug/classdef_breakpoints2.m: Add handle class with get and
set methods for new self tests.
* test/classdef-debug/test-classdef-breakpoints.tst: Add new tests for adding
and clearing breakpoints in `set` and `get` methods of `classdef` properties by
line number or function name. Make sure breakpoints are deleted in existing
tests also on test failures. Fix syntax error in 69eb4c27d8c8.
* test/classdef-debug/module.mk: Add new file to build system.
* etc/NEWS.10.md: Add note about new feature.
author | Markus Mützel <markus.muetzel@gmx.de> |
---|---|
date | Sat, 20 Apr 2024 13:13:50 +0200 |
parents | 2e484f9f1f18 |
children |
line wrap: on
line source
#! /bin/sh ######################################################################## ## ## Copyright (C) 2005-2024 The Octave Project Developers ## ## See the file COPYRIGHT.md in the top-level directory of this ## distribution or <https://octave.org/copyright/>. ## ## This file is part of Octave. ## ## Octave is free software: you can redistribute it and/or modify it ## under the terms of the GNU General Public License as published by ## the Free Software Foundation, either version 3 of the License, or ## (at your option) any later version. ## ## Octave is distributed in the hope that it will be useful, but ## WITHOUT ANY WARRANTY; without even the implied warranty of ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ## GNU General Public License for more details. ## ## You should have received a copy of the GNU General Public License ## along with Octave; see the file COPYING. If not, see ## <https://www.gnu.org/licenses/>. ## ######################################################################## if [ $# -ne 2 ]; then echo "usage: get-errno-list [--perl PERL|--python PYTHON|--sed SED]" 1>&2 exit 1 fi if [ $1 = "--perl" ]; then PERL="$2" $PERL -e 'foreach $key (sort (keys (%!))) { $x .= "#if defined ($key)\n { \"$key\", $key },\n#endif\n"; } while (<>) { s/^ *\@SYSDEP_ERRNO_LIST\@/$x/; s/\@NO_EDIT_WARNING\@/DO NOT EDIT! Generated automatically from oct-errno.in.cc by mk-errno-list.sh/; print; }' elif [ $1 = "--python" ]; then PYTHON="$2" $PYTHON -c ' from errno import errorcode from sys import stdin, stdout t = "#if defined (%s)\n { \"%s\", %s },\n#endif\n" errstr = "" for v in sorted (errorcode.values ()): errstr += t % tuple (3 * [v]) noedit = "DO NOT EDIT! Generated automatically from oct-errno.in.cc by mk-errno-list.sh" repls = ("@SYSDEP_ERRNO_LIST@", errstr), ("@NO_EDIT_WARNING@", noedit) for l in stdin: stdout.write (reduce (lambda a, kv: a.replace (*kv), repls, l)) ' elif [ $1 = "--sed" ]; then SED="$2" $SED -e '/@SYSDEP_ERRNO_LIST@/D' \ -e 's/@NO_EDIT_WARNING@/DO NOT EDIT! Generated automatically from oct-errno.in.cc by mk-errno-list.sh/' fi exit $?