| /dports/lang/racket-minimal/racket-8.3/src/ChezScheme/s/ |
| H A D | exceptions.ss | 147 (case-lambda
171 (debug-condition c)
172 (if (debug-on-exception) (debug))
180 (unless (or (warning-only? c) (debug-on-exception) (= ($cafe) 0) (not (interactive?)))
184 (debug-condition c)
185 (if (debug-on-exception) (debug))
220 (case-lambda
227 (case-lambda
332 (case-lambda
334 (unless (or ($simple-condition? x) (compound-condition? x))
[all …]
|
| H A D | 7.ss | 790 (define debug)
794 (define debug-condition* '())
974 (set! debug-condition* '())
1096 (set-who! debug-condition
1099 [(assv ($tc-field 'threadno ($tc)) debug-condition*) => cdr]
1104 (set! debug-condition*
1105 (let ([ls (remp (lambda (a) (eqv? (car a) n)) debug-condition*)])
1108 (set! debug
1145 (define debug-cafe
1176 (lambda (x) (set! debug-condition* (remq x debug-condition*)))
[all …]
|
| /dports/lang/racket/racket-8.3/src/ChezScheme/s/ |
| H A D | exceptions.ss | 147 (case-lambda
171 (debug-condition c)
172 (if (debug-on-exception) (debug))
180 (unless (or (warning-only? c) (debug-on-exception) (= ($cafe) 0) (not (interactive?)))
184 (debug-condition c)
185 (if (debug-on-exception) (debug))
220 (case-lambda
227 (case-lambda
332 (case-lambda
334 (unless (or ($simple-condition? x) (compound-condition? x))
[all …]
|
| H A D | 7.ss | 790 (define debug)
794 (define debug-condition* '())
974 (set! debug-condition* '())
1096 (set-who! debug-condition
1099 [(assv ($tc-field 'threadno ($tc)) debug-condition*) => cdr]
1104 (set! debug-condition*
1105 (let ([ls (remp (lambda (a) (eqv? (car a) n)) debug-condition*)])
1108 (set! debug
1145 (define debug-cafe
1176 (lambda (x) (set! debug-condition* (remq x debug-condition*)))
[all …]
|
| /dports/lang/chez-scheme/ChezScheme-9.5.4/s/ |
| H A D | exceptions.ss | 147 (case-lambda
171 (debug-condition c)
172 (if (debug-on-exception) (debug))
180 (unless (or (warning-only? c) (debug-on-exception) (= ($cafe) 0) (not (interactive?)))
184 (debug-condition c)
185 (if (debug-on-exception) (debug))
220 (case-lambda
227 (case-lambda
332 (case-lambda
334 (unless (or ($simple-condition? x) (compound-condition? x))
[all …]
|
| H A D | 7.ss | 716 (define debug)
720 (define debug-condition* '())
895 (set! debug-condition* '())
1017 (set-who! debug-condition
1020 [(assv ($tc-field 'threadno ($tc)) debug-condition*) => cdr]
1025 (set! debug-condition*
1026 (let ([ls (remp (lambda (a) (eqv? (car a) n)) debug-condition*)])
1029 (set! debug
1066 (define debug-cafe
1097 (lambda (x) (set! debug-condition* (remq x debug-condition*)))
[all …]
|
| /dports/math/R/R-4.1.2/src/library/base/man/ |
| H A D | debug.Rd | 1 % File src/library/base/man/debug.Rd
6 \name{debug}
8 \alias{debug}
14 debug(fun, text = "", condition = NULL, signature = NULL)
15 debugonce(fun, text = "", condition = NULL, signature = NULL)
23 \item{condition}{a condition that can be retrieved when the browser is
37 The \code{text} and \code{condition} arguments are the same as those
59 Using \code{debug} is persistent, and unless debugging is turned off
68 differently for this case, as it uses the trace machinery, rather than
69 the debugging bit. As such, \code{text} and \code{condition} cannot be
[all …]
|
| /dports/math/libRmath/R-4.1.1/src/library/base/man/ |
| H A D | debug.Rd | 1 % File src/library/base/man/debug.Rd
6 \name{debug}
8 \alias{debug}
14 debug(fun, text = "", condition = NULL, signature = NULL)
15 debugonce(fun, text = "", condition = NULL, signature = NULL)
23 \item{condition}{a condition that can be retrieved when the browser is
37 The \code{text} and \code{condition} arguments are the same as those
59 Using \code{debug} is persistent, and unless debugging is turned off
68 differently for this case, as it uses the trace machinery, rather than
69 the debugging bit. As such, \code{text} and \code{condition} cannot be
[all …]
|
| /dports/lang/librep/librep_0.92.7/lisp/rep/ |
| H A D | user.jl | 43 (condition-case error-data
68 --debug start in the debugger (implies --interp)
104 (unless (get-command-line-option "--no-rc")
105 (condition-case error-data
118 (if (get-command-line-option "--debug")
124 (setq debug-on-error '(bad-arg missing-arg invalid-function
135 (unless batch-mode
|
| /dports/lang/parrot/parrot-8.1.0/frontend/parrot2/ |
| H A D | prt0.pir | 37 __label_6: # case
41 __label_7: # case
45 __label_8: # case
49 __label_9: # case
53 __label_10: # case
70 unless $I3 goto __label_13
110 unless $P4 goto __label_23
215 unless $I4 goto __label_3
227 __label_7: # for condition
235 unless $P5 goto __label_9
[all …]
|
| /dports/lang/clisp/clisp-df3b9f6fdcff22832898e89a989eb499c0f842ed/tests/ |
| H A D | conditions.tst | 339 (handler-case
346 (handler-case
353 (handler-case
388 (restart-case (restart-case (%m "boo!")
397 (restart-case (restart-case %s
409 (restart-case (restart-case (%m "boo!")
441 (restart-case
471 (let ((*debug-io*
481 (declare (compile) (optimize safety (debug 1)))
486 (declaim (optimize safety (debug 1)))
[all …]
|
| /dports/lang/racket/racket-8.3/src/ChezScheme/mats/ |
| H A D | primvars.ms | 98 (if (case (#%$symbol-type x)
168 (syntax-case x ()
209 (unless (guard (c [else (okay-condition? prim c)])
291 (syntax-case x ()
383 [(annotation-options) (annotation-options debug) 1/2 #f]
687 (guard (c [else (unless (equal? (condition-message c) "variable ~:s is not bound")
697 (guard (c [else (unless (equal? (condition-message c) "attempt to apply non-procedure ~s")
778 (mat case-sensitive
779 (case-sensitive)
780 (ok case-sensitive #f)
[all …]
|
| /dports/lang/racket-minimal/racket-8.3/src/ChezScheme/mats/ |
| H A D | primvars.ms | 98 (if (case (#%$symbol-type x)
168 (syntax-case x ()
209 (unless (guard (c [else (okay-condition? prim c)])
291 (syntax-case x ()
383 [(annotation-options) (annotation-options debug) 1/2 #f]
687 (guard (c [else (unless (equal? (condition-message c) "variable ~:s is not bound")
697 (guard (c [else (unless (equal? (condition-message c) "attempt to apply non-procedure ~s")
778 (mat case-sensitive
779 (case-sensitive)
780 (ok case-sensitive #f)
[all …]
|
| /dports/lang/chez-scheme/ChezScheme-9.5.4/mats/ |
| H A D | primvars.ms | 98 (if (case (#%$symbol-type x)
200 (unless (guard (c [else (okay-condition? prim c)])
282 (syntax-case x ()
290 (syntax-case ins (->)
373 [(annotation-options) (annotation-options debug) 1/2 #f]
661 (guard (c [else (unless (equal? (condition-message c) "variable ~:s is not bound")
671 (guard (c [else (unless (equal? (condition-message c) "attempt to apply non-procedure ~s")
752 (mat case-sensitive
753 (case-sensitive)
754 (ok case-sensitive #f)
[all …]
|
| /dports/devel/boost_build/build-29baa79/src/tools/ |
| H A D | embarcadero.jam | 39 default compiler will be bcc32x. In either case when the command is not given
90 not need to specify this option unless Boost Build can not find the
186 .debug-configuration = true ;
216 case bcc32x :
220 case bcc64 :
224 case "bcc32x.exe" :
228 case "bcc64.exe" :
382 if $(.debug-configuration)
409 # /ml makes all symbol names case-sensitive
426 …flags embarcadero.link LINKPATH $(condition)/<variant>debug : $(lib_dir_debug) $(lib_dir_release) ;
[all …]
|
| /dports/math/stanmath/math-4.2.0/lib/boost_1.75.0/tools/build/src/tools/ |
| H A D | embarcadero.jam | 39 default compiler will be bcc32x. In either case when the command is not given
90 not need to specify this option unless Boost Build can not find the
186 .debug-configuration = true ;
216 case bcc32x :
220 case bcc64 :
224 case "bcc32x.exe" :
228 case "bcc64.exe" :
382 if $(.debug-configuration)
409 # /ml makes all symbol names case-sensitive
426 …flags embarcadero.link LINKPATH $(condition)/<variant>debug : $(lib_dir_debug) $(lib_dir_release) ;
[all …]
|
| /dports/devel/hyperscan/boost_1_75_0/tools/build/src/tools/ |
| H A D | embarcadero.jam | 39 default compiler will be bcc32x. In either case when the command is not given
90 not need to specify this option unless Boost Build can not find the
186 .debug-configuration = true ;
216 case bcc32x :
220 case bcc64 :
224 case "bcc32x.exe" :
228 case "bcc64.exe" :
382 if $(.debug-configuration)
409 # /ml makes all symbol names case-sensitive
426 …flags embarcadero.link LINKPATH $(condition)/<variant>debug : $(lib_dir_debug) $(lib_dir_release) ;
[all …]
|
| /dports/lang/mosh/mosh-0.2.7/lib/nmosh/debugger/ |
| H A D | core.nmosh.sls | 4 (nmosh debugger condition-printer)
105 (case (car dbg)
111 (deco/err (debug-format (cddr dbg))))
123 (deco/err (debug-format loc)))
138 (case id
163 (case id
171 (case (cadar cur)
191 (unless (= 0 (length disp-t))
206 (condition-printer/deco c)
|
| /dports/lang/parrot/parrot-8.1.0/ext/winxed/ |
| H A D | driver.pir | 54 $P10[0] = 'debug'
55 $P10[1] = 'Set debug mode'
82 unless $P15 goto __label_2
135 unless $P3 goto __label_2
287 $P13 = $P1.'getbool'('debug')
301 $P3["debug"] = $I3
319 __label_12: # case
320 __label_13: # case
322 __label_14: # case
323 __label_15: # case
[all …]
|
| /dports/editors/emacs-devel/emacs-4d1968b/doc/lispref/ |
| H A D | control.texi | 201 @defmac unless condition forms@dots{}
205 (unless @var{condition} @var{a} @var{b} @var{c})
1532 (condition-case x
1941 (condition-case nil
1987 @code{condition-case}, set the variable @code{debug-on-signal} to a
1994 (condition-case nil
2006 @defmac condition-case-unless-debug var protected-form handlers@dots{}
2007 The macro @code{condition-case-unless-debug} provides another way to
2009 @code{condition-case}, unless the variable @code{debug-on-error} is
2166 (condition-case err
[all …]
|
| /dports/editors/emacs/emacs-27.2/doc/lispref/ |
| H A D | control.texi | 201 @defmac unless condition forms@dots{}
205 (unless @var{condition} @var{a} @var{b} @var{c})
1512 (condition-case x
1921 (condition-case nil
1967 @code{condition-case}, set the variable @code{debug-on-signal} to a
1974 (condition-case nil
1986 @defmac condition-case-unless-debug var protected-form handlers@dots{}
1987 The macro @code{condition-case-unless-debug} provides another way to
1989 @code{condition-case}, unless the variable @code{debug-on-error} is
2018 @code{condition-case} form; in this case, the @code{condition-case} has
[all …]
|
| /dports/databases/percona57-pam-for-mysql/boost_1_59_0/tools/build/src/tools/ |
| H A D | python.jam | 97 : condition * : extension-suffix ? )
607 # be entered concurrently (unless they explicitly give up the interpreter lock).
639 case qnx* : return ;
640 case darwin : return ;
641 case windows : return ;
642 case haiku : return ;
687 condition * : extension-suffix ? )
839 local target-requirements = $(condition) ;
888 if <python-debugging>on in $(condition)
1018 case hpux :
[all …]
|
| /dports/databases/mysqlwsrep57-server/boost_1_59_0/tools/build/src/tools/ |
| H A D | python.jam | 97 : condition * : extension-suffix ? )
607 # be entered concurrently (unless they explicitly give up the interpreter lock).
639 case qnx* : return ;
640 case darwin : return ;
641 case windows : return ;
642 case haiku : return ;
687 condition * : extension-suffix ? )
839 local target-requirements = $(condition) ;
888 if <python-debugging>on in $(condition)
1018 case hpux :
[all …]
|
| /dports/databases/xtrabackup/boost_1_59_0/tools/build/src/tools/ |
| H A D | python.jam | 97 : condition * : extension-suffix ? )
607 # be entered concurrently (unless they explicitly give up the interpreter lock).
639 case qnx* : return ;
640 case darwin : return ;
641 case windows : return ;
642 case haiku : return ;
687 condition * : extension-suffix ? )
839 local target-requirements = $(condition) ;
888 if <python-debugging>on in $(condition)
1018 case hpux :
[all …]
|
| /dports/databases/percona57-server/boost_1_59_0/tools/build/src/tools/ |
| H A D | python.jam | 97 : condition * : extension-suffix ? )
607 # be entered concurrently (unless they explicitly give up the interpreter lock).
639 case qnx* : return ;
640 case darwin : return ;
641 case windows : return ;
642 case haiku : return ;
687 condition * : extension-suffix ? )
839 local target-requirements = $(condition) ;
888 if <python-debugging>on in $(condition)
1018 case hpux :
[all …]
|