[svn:parrot] r36644 - trunk/compilers/imcc

[Infinoid at svn.parrot.org]

Author: Infinoid
Date: Thu Feb 12 21:14:50 2009
New Revision: 36644
URL: https://trac.parrot.org/parrot/changeset/36644

Log:
Apply patch from (Dany Arbelo)++ in RT #46503:
[imcc] Issue warnings when called with deprecated runcore options.

Modified:
   trunk/compilers/imcc/main.c

Modified: trunk/compilers/imcc/main.c
==============================================================================
--- trunk/compilers/imcc/main.c	Thu Feb 12 21:01:23 2009	(r36643)
+++ trunk/compilers/imcc/main.c	Thu Feb 12 21:14:50 2009	(r36644)
@@ -413,6 +413,9 @@
                         "\n\nhelp: parrot -h\n", opt.opt_arg);
                 break;
             case 'b':
+                Parrot_warn(interp, PARROT_WARNINGS_ALL_FLAG,
+                        "The -b option is deprecated, use the -R or "
+                        "--runcore options instead.");
                 SET_FLAG(PARROT_BOUNDS_FLAG);
                 break;
             case 'p':
@@ -425,18 +428,33 @@
                     SET_TRACE(PARROT_TRACE_OPS_FLAG);
                 break;
             case 'j':
+                Parrot_warn(interp, PARROT_WARNINGS_ALL_FLAG,
+                        "The -j option is deprecated, use the -R or "
+                        "--runcore options instead.");
                 SET_CORE(PARROT_JIT_CORE);
                 break;
             case 'S':
+                Parrot_warn(interp, PARROT_WARNINGS_ALL_FLAG,
+                        "The -S option is deprecated, use the -R or "
+                        "--runcore options instead.");
                 SET_CORE(PARROT_SWITCH_CORE);
                 break;
             case 'C':
+                Parrot_warn(interp, PARROT_WARNINGS_ALL_FLAG,
+                        "The -C option is deprecated, use the -R or "
+                        "--runcore options instead.");
                 SET_CORE(PARROT_CGP_CORE);
                 break;
             case 'f':
+                Parrot_warn(interp, PARROT_WARNINGS_ALL_FLAG,
+                        "The -f option is deprecated, use the -R or "
+                        "--runcore options instead.");
                 SET_CORE(PARROT_FAST_CORE);
                 break;
             case 'g':
+                Parrot_warn(interp, PARROT_WARNINGS_ALL_FLAG,
+                        "The -g option is deprecated, use the -R or "
+                        "--runcore options instead.");
                 SET_CORE(PARROT_CGOTO_CORE);
                 break;
             case 'd':