Define generics to avoid a style warning message at times.

diff --git a/run-generic.lisp b/run-generic.lisp
index 5975f4c..d4a54bc 100644 (file)
--- a/run-generic.lisp
+++ b/run-generic.lisp
@@ -2,6 +2,10 @@
 
 (in-package :inferior-shell)
 
+(defgeneric process-redirection (redirection input output error))
+(defgeneric generic-run-spec (spec input output error predicate rest resume))
+(defgeneric process-result (result))
+
 ;; list of streams to close when finished
 (defvar *streams-to-close* nil)