(cough) text of the patch - Re: Patch - Defsystem - run-os-program
Sean Champ <[email protected]> Sun, 30 Jul 2006 02:47:22 -0700
| Newsgroups | gmane.lisp.clocc.devel |
|---|---|
| Message-ID | <[email protected]> |
It's late,a nd this is the Nth patch I've submitted, in this night. Before I'd sent the previous message - the message to which this is a follow-up - I had neglected to attach the text of the patch. The text of the patch addressed in that message is attached to this message. Though this may bear a more distinct addressing: I've a user account at sourceforge - user-name schamp; I would like to propose if I would be added as a developer onto the clocc project. Thank you -- Sean ------------------------------------------------------------------------- Take Surveys. Earn Cash. Influence the Future of IT Join SourceForge.net's Techsay panel and you'll get the chance to share your opinions on IT & business topics through brief surveys -- and earn cash http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV _______________________________________________ clocc-devel mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/clocc-devel
defsystem.run-os-program-lambda-list.diff
(text/x-diff, 1.2 KB)
Index: run-os-program.lisp
===================================================================
RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/utilities/run-os-program.lisp,v
retrieving revision 1.4
diff -p -u -u -r1.4 run-os-program.lisp
--- run-os-program.lisp 26 Mar 2002 19:49:59 -0000 1.4
+++ run-os-program.lisp 30 Jul 2006 09:36:22 -0000
@@ -1,4 +1,4 @@
-;;; -*- Mode: CLtL -*-
+;;; -*- Mode: lisp -*-
;;; run-os-program --
@@ -20,13 +20,22 @@
)
-(defgeneric run-os-program (program
- &key
- (arguments ())
- (input *standard-input*)
- (output *standard-output*)
- (error-output *error-output*)
- &allow-other-keys)
+(defgeneric run-os-program (program &key
+ arguments input output error-output
+ &allow-other-keys)
+
+ ;; NB: Lisp hosts running on a Microsoft platform might not support a
+ ;; distinction between OUTPUT and ERROR-OUTPUT streams [S. Champ]
+
+ ;; a lambda list recommended for methods on this function:
+ #+NIL (program
+ &key
+ (arguments ())
+ (input *standard-input*)
+ (output *standard-output*)
+ (error-output *error-output*)
+ &allow-other-keys)
+
(:documentation
"Runs a `command' in the underlying Operating System."))