[svn:parrot] r44718 - trunk/src

[cotto at svn.parrot.org]

Author: cotto
Date: Sat Mar  6 23:51:15 2010
New Revision: 44718
URL: https://trac.parrot.org/parrot/changeset/44718

Log:
[string] move --hash-seed to parseflags_minimal, before any strings are created

Modified:
   trunk/src/main.c

Modified: trunk/src/main.c
==============================================================================
--- trunk/src/main.c	Sat Mar  6 23:51:11 2010	(r44717)
+++ trunk/src/main.c	Sat Mar  6 23:51:15 2010	(r44718)
@@ -405,6 +405,13 @@
             }
             break;
         }
+        else if (STREQ(arg, "--hash-seed")) {
+            ++pos;
+            arg = argv[pos];
+            if (is_all_hex_digits(arg)) {
+                interp->hash_seed = strtoul(arg, NULL, 16);
+            }
+        }
         ++pos;
     }
 }
@@ -496,11 +503,6 @@
             else
                 SET_DEBUG(PARROT_MEM_STAT_DEBUG_FLAG);
             break;
-          case 'H':
-            if (opt.opt_arg && is_all_hex_digits(opt.opt_arg)) {
-                interp->hash_seed = strtoul(opt.opt_arg, NULL, 16);
-            }
-            break;
 
           case '.':  /* Give Windows Parrot hackers an opportunity to
                       * attach a debuggger. */
@@ -510,6 +512,9 @@
             help();
             exit(EXIT_FAILURE);
             break;
+          case 'H':
+            /* handled in parseflags_minimal */
+            break;
           case OPT_HELP_DEBUG:
             help_debug();
             exit(EXIT_FAILURE);