2009-03-10 01:12 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

* harbour/source/compiler/hbusage.c
    ! fixed the /u+ description - it does not work like #include.
      Only preprocessor command are significant in files included
      by -u<file> and -u+<file>

  * harbour/doc/man/harbour.1
    + add -u+<file> description

  * harbour/source/pp/ppcore.c
    ! fixed typo in error message table (missing ',')

  * harbour/source/compiler/cmdcheck.c
    * generate error when -u+ is used without <file>

  * harbour/source/compiler/hbmain.c
    * do not display usage screen if other errors were generated before

harbour/ChangeLog

@@ -8,6 +8,24 @@
    2009-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
 */
 
+2009-03-10 01:12 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/source/compiler/hbusage.c
+    ! fixed the /u+ description - it does not work like #include.
+      Only preprocessor command are significant in files included
+      by -u<file> and -u+<file>
+
+  * harbour/doc/man/harbour.1
+    + add -u+<file> description
+
+  * harbour/source/pp/ppcore.c
+    ! fixed typo in error message table (missing ',')
+
+  * harbour/source/compiler/cmdcheck.c
+    * generate error when -u+ is used without <file>
+
+  * harbour/source/compiler/hbmain.c
+    * do not display usage screen if other errors were generated before
+
 2009-03-09 23:05 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
   * source/compiler/hbusage.c
     + Added -u+ to help screen.

harbour/doc/man/harbour.1

@@ -68,6 +68,8 @@ set maximum number of preprocessor iterations
 syntax check only
 .IP "\fB-u[<file>]\fP" 10
 use command def set in <file> (or none)
+.IP "\fB-u+<file>\fP" 10
+add command def set from <file>
 .IP "\fB-undef:<id>\fP" 10
 #undef <id>
 .IP "\fB-v\fP" 10

harbour/source/compiler/cmdcheck.c

@@ -612,6 +612,8 @@ static void hb_compChkEnvironVar( HB_COMP_DECL, const char *szSwitch )
                      HB_COMP_PARAM->szStdChExt[ HB_COMP_PARAM->iStdChExt++ ] =
                            hb_strdup( s + 2 );
                   }
+                  else
+                     hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'F', HB_COMP_ERR_BADOPTION, s, NULL );
                }
                else
                {

harbour/source/compiler/hbmain.c

@@ -102,13 +102,13 @@ int hb_compMain( int argc, char * const argv[], BYTE ** pBufPtr, ULONG * pulSize
       {
          hb_compOutStd( HB_COMP_PARAM, "\n" );
          hb_verBuildInfo();
-         hb_comp_free( HB_COMP_PARAM );
-         return iStatus;
       }
 
       if( HB_COMP_PARAM->fCredits )
-      {
          hb_compPrintCredits( HB_COMP_PARAM );
+
+      if( HB_COMP_PARAM->fBuildInfo || HB_COMP_PARAM->fCredits )
+      {
          hb_comp_free( HB_COMP_PARAM );
          return iStatus;
       }
@@ -147,7 +147,7 @@ int hb_compMain( int argc, char * const argv[], BYTE ** pBufPtr, ULONG * pulSize
       }
    }
 
-   if( ! bAnyFiles && ! HB_COMP_PARAM->fQuiet )
+   if( ! bAnyFiles && ! HB_COMP_PARAM->fQuiet && ! HB_COMP_PARAM->fExit )
    {
       hb_compPrintUsage( HB_COMP_PARAM, argv[ 0 ] );
       iStatus = EXIT_FAILURE;

harbour/source/compiler/hbusage.c

@@ -100,7 +100,7 @@ void hb_compPrintUsage( HB_COMP_DECL, const char * szSelf )
            "\n          %cs               syntax check only",
 /* TODO:   "\n          %ct<path>         path for temp file creation", */
            "\n          %cu[<file>]       use command def set in <file> (or none)",
-           "\n          %cu+[<file>]      #include <file>",
+           "\n          %cu+<file>        add command def set from <file>",
            "\n          %cundef:<id>      #undef <id>",
            "\n          %cv               variables are assumed M->",
            "\n          %cw[<level>]      set warning level number (0..3, default 1)",

harbour/source/pp/ppcore.c

@@ -148,7 +148,7 @@ static const char * hb_pp_szErrors[] =
    "Bad filename in #include",                                          /* C3008 */
    "Too many nested #includes",                                         /* C3009 */
    "Invalid name follows #",                                            /* C3010 */
-   "Can't open standard rule file '%s'"                                 /* C3011 */
+   "Can't open standard rule file '%s'",                                /* C3011 */
    "Write error to intermediate file '%s'"                              /* C3029 */
 };