# -*- shell-script -*- # continue.sh - gdb-like "continue" debugger command # # Copyright (C) 2002-2006, 2008, 2010, 2016 Rocky Bernstein # # # This program 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 2, or # (at your option) any later version. # # This program 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 this program; see the file COPYING. If not, write to # the Free Software Foundation, 59 Temple Place, Suite 330, Boston, # MA 02111 USA. _Dbg_help_add continue \ '**continue** [*loc* | **-** ] Continue script execution. If *loc* or *-* is not given, continue until the next breakpoint or the end of program is reached. If **-** is given, then debugging will be turned off after continuing causing your program to run at full speed. If **loc* is given, a temporary breakpoint is set at the location.' proc _Dbg_do_continue { _Dbg_not_running && return 3 if sh-expr ' $# == 0 )' { setglobal _Dbg_continue_rc = '0' return 0 } typeset filename typeset -i line_number typeset full_filename if [[ $1 == '-' ]] { setglobal _Dbg_restore_debug_trap = '0' setglobal _Dbg_continue_rc = '0' return 0 } _Dbg_linespec_setup $1 setglobal _Dbg_last_cmd = ''continue'' if [[ -n "$full_filename" ]] { if sh-expr ' line_number == 0 )' { _Dbg_errmsg 'There is no line 0 to continue at.' return 1 } else { _Dbg_check_line $line_number $full_filename sh-expr ' $? == 0 )'&& \ _Dbg_set_brkpt $full_filename $line_number 1 1 setglobal _Dbg_continue_rc = '0' return 0 } } else { _Dbg_file_not_read_in $filename return 2 } } _Dbg_alias_add 'c' 'continue' _Dbg_alias_add 'cont' 'continue'