diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-02-27 13:35:23 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-02-27 13:39:57 -0700 |
| commit | 04a74f001710244b31ee23b028d18693be76378c (patch) | |
| tree | 8e061b5eea3e06039ee05e7bb6d375b397425717 /src/connection.lisp | |
| parent | bd26505bfe86e2aed90c2782e5441960b8ef858c (diff) | |
| download | consfigurator-04a74f001710244b31ee23b028d18693be76378c.tar.gz | |
add :CHROOT-FORK connection type
Thanks to Mark Wooding for help with handling the streams, dealing with the
debugger in the child, and the FORMAT rune for the child status.
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/connection.lisp')
| -rw-r--r-- | src/connection.lisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/connection.lisp b/src/connection.lisp index 3a09bac..4e0863f 100644 --- a/src/connection.lisp +++ b/src/connection.lisp @@ -61,6 +61,9 @@ For an example of usage, see the :SUDO connection type.")) (defclass posix-connection (connection) ()) +(defun lisp-connection-p () + (subtypep (type-of *connection*) 'lisp-connection)) + ;;; generic functions to operate on subclasses of CONNECTION (defgeneric connection-run (connection cmd input) |