From 04a74f001710244b31ee23b028d18693be76378c Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sat, 27 Feb 2021 13:35:23 -0700 Subject: 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 --- src/connection.lisp | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/connection.lisp') 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) -- cgit v1.2.3