add DEFINE to the dictionary formatter

diff --git a/scripts/dict/format.pl b/scripts/dict/format.pl
index eaab1e67565a06be417f38cb8c5550033acab509..30765a77b7a1ebecc77319c62dfc7aee96f1d714 100755 (executable)
--- a/scripts/dict/format.pl
+++ b/scripts/dict/format.pl
@@ -230,6 +230,20 @@ while (@ARGV) {
             next;
         }
 
+        #
+        #  Get DEFINE.
+        #
+        if (/^DEFINE\s+([-\w]+)\s+(\w+)(.*)/) {
+            my $name = $1;
+            my $tabs = tabs(40, $name);
+
+            my $type = $2;
+            my $stuff = $3;
+
+            push @output, "DEFINE\t$name$tabs\t$type$stuff\n";
+            next;
+        }
+
         #
         #  Get MEMBER
         #