svn:eol-style native, svn:keywords Author Date Id Revision
[fw/sdcc] / support / cpp2 / opt-gather.awk
index 87dd37ab5333bc3e75e109236864bb4a9d2221a5..084362ec1eaa1b1628e05cb200791412fe35143e 100644 (file)
@@ -1,54 +1,54 @@
-#  Copyright (C) 2003,2004 Free Software Foundation, Inc.\r
-#  Contributed by Kelley Cook, June 2004.\r
-#  Original code from Neil Booth, May 2003.\r
-#\r
-# This program is free software; you can redistribute it and/or modify it\r
-# under the terms of the GNU General Public License as published by the\r
-# Free Software Foundation; either version 2, or (at your option) any\r
-# later version.\r
-# \r
-# This program is distributed in the hope that it will be useful,\r
-# but WITHOUT ANY WARRANTY; without even the implied warranty of\r
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
-# GNU General Public License for more details.\r
-# \r
-# You should have received a copy of the GNU General Public License\r
-# along with this program; if not, write to the Free Software\r
-# Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.\r
-\r
-# This Awk script takes a list of *.opt files and combines them into \r
-# a three-field sorted list suitable for input into opt[ch]-gen.awk.\r
-#\r
-# Usage: awk -f opt-gather.awk file1.opt [...] > outputfile\r
-\r
-function sort(ARRAY, ELEMENTS)\r
-{\r
-       for (i = 2; i <= ELEMENTS; ++i) {\r
-               for (j = i; ARRAY[j-1] > ARRAY[j]; --j) {\r
-                       temp = ARRAY[j]\r
-                       ARRAY[j] = ARRAY[j-1]\r
-                       ARRAY[j-1] = temp\r
-               }\r
-       }\r
-       return\r
-}\r
-\r
-BEGIN {        numrec = 0 }\r
-\r
-# Ignore comments and blank lines\r
-/^[ \t]*(;|$)/  { flag = 0; next }\r
-/^[^ \t]/       { if (flag == 0) {\r
-                    record[++numrec] = $0\r
-                   flag = 1 }\r
-                 else {\r
-                   record[numrec] = record[numrec] SUBSEP $0\r
-                 }\r
-}\r
-\r
-# Sort it and output it\r
-END {\r
-       sort(record,numrec)\r
-       \r
-       for (i = 1; i <= numrec; i++) {\r
-               print record[i] }\r
-}\r
+#  Copyright (C) 2003,2004 Free Software Foundation, Inc.
+#  Contributed by Kelley Cook, June 2004.
+#  Original code from Neil Booth, May 2003.
+#
+# This program is free software; you can redistribute it and/or modify it
+# under the terms of the GNU General Public License as published by the
+# Free Software Foundation; either version 2, or (at your option) any
+# later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+# This Awk script takes a list of *.opt files and combines them into 
+# a three-field sorted list suitable for input into opt[ch]-gen.awk.
+#
+# Usage: awk -f opt-gather.awk file1.opt [...] > outputfile
+
+function sort(ARRAY, ELEMENTS)
+{
+       for (i = 2; i <= ELEMENTS; ++i) {
+               for (j = i; ARRAY[j-1] > ARRAY[j]; --j) {
+                       temp = ARRAY[j]
+                       ARRAY[j] = ARRAY[j-1]
+                       ARRAY[j-1] = temp
+               }
+       }
+       return
+}
+
+BEGIN {        numrec = 0 }
+
+# Ignore comments and blank lines
+/^[ \t]*(;|$)/  { flag = 0; next }
+/^[^ \t]/       { if (flag == 0) {
+                    record[++numrec] = $0
+                   flag = 1 }
+                 else {
+                   record[numrec] = record[numrec] SUBSEP $0
+                 }
+}
+
+# Sort it and output it
+END {
+       sort(record,numrec)
+       
+       for (i = 1; i <= numrec; i++) {
+               print record[i] }
+}