From: Eric S. Raymond <esr@thyrsus,com>
Date: Fri, 23 Jan 2004 19:51:46 +0000 (+0000)
Subject: Added -g option.
X-Git-Tag: 1.0~169
X-Git-Url: http://thyrsus.com/gitweb/?a=commitdiff_plain;h=df3fb64a2311870603f25c4d25e2909be47df93e;p=mad.git

Added -g option.
---

diff --git a/mad b/mad
index 6aedb79..ee2b0e7 100755
--- a/mad
+++ b/mad
@@ -539,13 +539,16 @@ if __name__ == '__main__':
     import os, getopt
     mad_debug = 0
     binary = True
+    dump_tuples = False
     target = None
-    (options, arguments) = getopt.getopt(sys.argv[1:], "cd:o:")
+    (options, arguments) = getopt.getopt(sys.argv[1:], "cd:go:")
     for (opt, val) in options:
         if opt == '-c':
             binary = False
         elif opt == '-d':
             mad_debug = int(val)
+        elif opt == '-g':
+            dump_tuples = True
         elif opt == '-o':
             target = val
 
@@ -576,6 +579,11 @@ if __name__ == '__main__':
 
     # Perform global analysis
     analyze(deck)
+
+    if (dump_tuples):
+        for t in deck:
+            print t
+
     # Generate code
     if arguments == ['-']:
         generate(sys.stdout)