diff --git a/Source/Modules/guile.cxx b/Source/Modules/guile.cxx index c1821c916..e0a084583 100644 --- a/Source/Modules/guile.cxx +++ b/Source/Modules/guile.cxx @@ -46,11 +46,6 @@ Guile Options (available with -guile)\n\ -scmstub - Output Scheme file with module declaration and\n\ exports; only with `passive' and `simple' linkage\n\ -useclassprefix - Prepend the class name to all goops identifiers\n\ -\n\ -Obsolete parameters:\n\ -These parameters do nothing, but are kept for compatibility with old scripts only.\n\ - -gh - Was used to select the gh_ Guile API. \n\ - -scm - scm Guile API is always used now. \n\ \n"; static File *f_begin = 0; @@ -218,10 +213,10 @@ public: goops = true; Swig_mark_arg(i); } else if (strcmp(argv[i], "-gh") == 0) { - Printf(stderr, "guile: Warning: -gh option is deprecated. Swig will always generate wrappers using the scm interface. See documentation for more information regarding the deprecated gh interface.\n"); + Printf(stderr, "Deprecated command line option: -gh. Wrappers are always generated for the SCM interface. See documentation for more information regarding the deprecated GH interface.\n"); Swig_mark_arg(i); } else if (strcmp(argv[i], "-scm") == 0) { - Printf(stderr, "guile: Warning: -scm option is deprecated. Swig will always generate wrappers using the scm interface. See documentation for more information regarding the deprecated gh interface.\n"); + Printf(stderr, "Deprecated command line option: -scm. Wrappers are always generated for the SCM interface. See documentation for more information regarding the deprecated GH interface.\n"); Swig_mark_arg(i); } else if (strcmp(argv[i], "-primsuffix") == 0) { if (argv[i + 1]) {