[Ecls-list] a 'newline' patch and an 'ecl-config' question

[Robert Lehr]

I attached a patch to put a newline at
  + at the end of the usage message, and
  + when compilation finishes.

I apply it via rpm for now.  The build output is easier to read with the newlines.

In the ecl-config cflags, is the autoconf machine triplet macro useful or
required?  It causes meaningless "ISO" warnings when building my application.  I
am referring to the cpp macro passed in the CFLAGS that looks like this.

     -Di386-redhat-linux
     -Di386-pc-linux

It is substituted from autoconf in the '-D at host@' line in the pre-build
ecl-config.  No references that I found for this triplet explain its use.

I deleted it in my installation.  It works fine.

-- 

Robert Lehr
bozzio at the-lehrs.com
-------------- next part --------------
--- src/cmp/cmpmain.lsp-0	Mon Nov  3 07:44:26 2003
+++ src/cmp/cmpmain.lsp	Wed Nov 12 14:40:25 2003
@@ -383,18 +383,18 @@
                         (when load (load so-pathname))
                         (when *compile-verbose*
 			  (print-compiler-info)
-			  (format t "~&;;; Finished compiling ~a."
+			  (format t "~&;;; Finished compiling ~a.~%"
 				  (namestring input-pathname))))
 		       ((and system-p (probe-file o-pathname))
                         (when *compile-verbose*
 			  (print-compiler-info)
-			  (format t "~&;;; Finished compiling ~a."
+			  (format t "~&;;; Finished compiling ~a.~%"
 				  (namestring input-pathname))))
                        (t (format t "~&;;; The C compiler failed to compile the intermediate file.~%")
                           (setq *error-p* t))))
 		(*compile-verbose*
 		 (print-compiler-info)
-		 (format t "~&;;; Finished compiling ~a."
+		 (format t "~&;;; Finished compiling ~a.~%"
 			 (namestring input-pathname))))
           ;(unless c-file (delete-file c-pathname))
           ;(unless h-file (delete-file h-pathname))
--- src/lsp/top.lsp-0	Wed Nov 12 14:37:00 2003
+++ src/lsp/top.lsp	Wed Nov 12 14:25:52 2003
@@ -401,7 +401,7 @@
 	   (eval (read-from-string (argv i)))))
       (t (format t "Unknown flag ~A
 Usage: ecl [-dir dir] [-load file] [-eval expr]
-	[-compile file [-o ofile] [-c [cfile]] [-h [hfile]] [-data [datafile]] [-s]]"
+	[-compile file [-o ofile] [-c [cfile]] [-h [hfile]] [-data [datafile]] [-s]]~%"
 		(argv i))
 	 (quit 1)))))