Emit a "do not edit" line to the generated file.

[pspp] / lib / uniname / gen-uninames.lisp

diff --git a/lib/uniname/gen-uninames.lisp b/lib/uniname/gen-uninames.lisp
index 2bc0014964ed8b80e87763ee17f71542bf76278d..8456d3395b7322e37874732de2a35cdbf36bf68a 100755 (executable)
--- a/lib/uniname/gen-uninames.lisp
+++ b/lib/uniname/gen-uninames.lisp
@@ -120,6 +120,7 @@
       ;; Output the tables.
       (with-open-file (ostream outputfile :direction :output
                        #+UNICODE :external-format #+UNICODE charset:ascii)
+        (format ostream "/* DO NOT EDIT! GENERATED AUTOMATICALLY! */~%")
         (format ostream "/*~%")
         (format ostream " * ~A~%" (file-namestring outputfile))
         (format ostream " *~%")