diff --git a/uiop/run-program.lisp b/uiop/run-program.lisp index 6709b7a9db96b4b6423ec0772334568bb40310fd..fcfa25156e4d1ee5787e24cb5478ea5284fcdc09 100644 --- a/uiop/run-program.lisp +++ b/uiop/run-program.lisp @@ -428,6 +428,7 @@ It returns a process-info plist with possible keys: (%input (%normalize-io-specifier input :input)) (%output (%normalize-io-specifier output :output)) (%error-output (%normalize-io-specifier error-output :error-output)) + #+(and allegro os-windows) (interactive (%interactivep input output error-output)) (process* #+allegro (multiple-value-list