PATCH for guile-snarf.awk.in

[Neil Jerram]

Hi Greg,

The guile-snarf.awk.in patch below does nothing but regularize AWK's
quoting of quotation marks.  It keeps Emacs happier, and I've verified
on my Linux box that the changes have no effect on the set of
generated .doc files.

BTW, the autogenerated guile-snarf.awk is identical to
guile-snarf.awk.in - is it worth keeping the autogen step for this
file?

Regards,

        Neil

Index: guile-snarf.awk.in
===================================================================
RCS file: /cvs/guile/guile-core/libguile/guile-snarf.awk.in,v
retrieving revision 1.8
diff -u -r1.8 guile-snarf.awk.in
--- guile-snarf.awk.in  2000/06/21 08:43:12     1.8
+++ guile-snarf.awk.in  2000/09/22 15:16:15
@@ -53,10 +53,10 @@
 
 /SCM_SNARF_DOCSTRING_START/,/SCM_SNARF_DOCSTRING_END.*$/ { copy = $0; 
                       gsub(/.*SCM_SNARF_DOCSTRING_START/,"",copy); 
-                     sub(/^[ \t]*"?/,"", copy);
+                     sub(/^[ \t]*\"?/,"", copy);
                      sub(/\"?[ \t]*SCM_SNARF_DOCSTRING_END.*$/,"", copy);
-                      gsub(/\\n\\n"?/,"\n",copy);
-                      gsub(/\\n"?[ \t]*$/,"",copy);
+                      gsub(/\\n\\n\"?/,"\n",copy);
+                      gsub(/\\n\"?[ \t]*$/,"",copy);
                       gsub(/\\\"[ \t]*$/,"\"",copy);
                       gsub(/[ \t]*$/,"", copy);
                       if (copy != "") { print copy > dot_doc_file }