2011-02-17 15:01 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)

* contrib/hbrun/hbrun.prg
    + Added GTWVT on win builds.

  * src/rtl/gtcrs/gtcrs.c
    ! Typo in comment.

  * src/rtl/errapi.c
    ! Deleted old TOFIX most pbly not relevant anymore.

  * tests/testid.prg
    ! Deleted old TOFIX and formatting.

harbour/ChangeLog

@@ -16,6 +16,19 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2011-02-17 15:01 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
+  * contrib/hbrun/hbrun.prg
+    + Added GTWVT on win builds.
+
+  * src/rtl/gtcrs/gtcrs.c
+    ! Typo in comment.
+
+  * src/rtl/errapi.c
+    ! Deleted old TOFIX most pbly not relevant anymore.
+
+  * tests/testid.prg
+    ! Deleted old TOFIX and formatting.
+
 2011-02-17 13:57 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
   * src/rtl/achoice.prg
     + Added TOFIX.

harbour/contrib/hbrun/hbrun.prg

@@ -71,6 +71,9 @@ REQUEST __HB_EXTERN__
 REQUEST HB_GT_CGI
 REQUEST HB_GT_PCA
 REQUEST HB_GT_STD
+#if defined( __PLATFORM__WINDOWS )
+REQUEST HB_GT_WVT
+#endif
 
 #define HB_HISTORY_LEN 500
 #define HB_LINE_LEN    256

harbour/src/rtl/errapi.c

@@ -493,8 +493,6 @@ HB_ERROR_INFO_PTR hb_errorHandler( HB_ERROR_INFO_PTR pNewHandler )
    return pOld;
 }
 
-/* TOFIX: Make it Clipper compatible. [vszakats] */
-
 HB_FUNC( DOSERROR )
 {
    PHB_ERRDATA pErrData = ( PHB_ERRDATA ) hb_stackGetTSD( &s_errData );

harbour/src/rtl/gtcrs/gtcrs.c

@@ -1326,7 +1326,7 @@ static void disp_cursor( InOutBase * ioBase )
             cv = ioBase->cvvis;
             break;
          case SC_SPECIAL2:
-            /* TODO: find a proper sequqnce to set a cursor
+            /* TODO: find a proper sequence to set a cursor
                to SC_SPECIAL2 under Linux console?
                There is no such mode in current stable kernels (2.4.20)
              */

harbour/tests/testid.prg

@@ -1,18 +1,16 @@
-//NOTEST
-//
-// $Id$
-//
+/*
+ * $Id$
+ */
 
-// Warning: This sample must be tested using /dTEST compiler flag
-
-//TODO: Check why there is core dump om Linux if this file is compiled
-// without /dTEST
+#ifndef TEST
+#warning Warning: This sample must be tested using /dTEST compiler flag
+#endif
 
 #define FIRST
 #define SECOND
 #define THIRD
 
-function Main()
+FUNCTION Main()
 
    QOut( "testing Harbour /d compiler flag" )
 
@@ -20,7 +18,7 @@ function Main()
       QOut( "Fine, you have just tested the /d compiler flag" )
    #else
       QOut( "Please use /dTEST compiler flag" )
-      QOut( "Or run 'SET HB_USER_PRGFLAGS=/dTEST' if you are using the GNU Make System" )
+      QOut( "Or run 'set HB_USER_PRGFLAGS=/dTEST' if you are using the GNU Make System" )
    #endif
 
    #ifdef FIRST
@@ -43,4 +41,4 @@ function Main()
       QOut( "FIRST is not defined" )
    #endif
 
-return nil
+   RETURN NIL