diff options
Diffstat (limited to 'src/devtools-protocol.lisp')
| -rw-r--r-- | src/devtools-protocol.lisp | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/devtools-protocol.lisp b/src/devtools-protocol.lisp index 6e60f69..1d183bc 100644 --- a/src/devtools-protocol.lisp +++ b/src/devtools-protocol.lisp @@ -56,6 +56,12 @@ "Returns true if `message` describes a runtime exception" (jsown:keyp (json-obj-get message "result") "exceptionDetails")) +(defun inspector-target-crashed-msg-p (message) + "Returns true if `message` describes a target crashed" + (equal + (json-obj-get message "method") + "Inspector.targetCrashed")) + (defun parse-get-targets-response (response) "Parses a list of target info objects from the response to `Target.getTargets`." (let* ((result (json-obj-get response "result")) |