Key

Not instrumented

Conditionalized out

Executed

Not executed

Both branches taken

One branch taken

Neither branch taken

1

;;; gui/server.lisp --- GUI Server API

2

3

;; This package provides a server protocol for communication with GUI

4

;; Clients.

5

6

;; See GUI/CLIENT for details.

7

8

(in-package :gui/core)

9

10

(defgeneric gui-server-p (obj)

11

(:method ((obj t)) nil))