19990809-07:40 GMT+1

harbour/ChangeLog

@@ -1,3 +1,18 @@
+19990809-07:40 GMT+1 Victor Szel <info@szelvesz.hu>
+   * source/odbc moved to contrib/odbc
+   * source/rtl/console.c
+     + #include "io.h" added for __CYGWIN__
+   * tests/working/block2.PRG removed.
+   * tests/working/transdef.prg
+     tests/working/testrdd.prg
+     tests/working/testpre.prg
+     tests/working/testdbf.prg
+     tests/working/strsub.prg
+     tests/working/dates4.prg
+     ! CVS tag added.
+   * source/rtl/mtran.c
+     ! Small typo.
+
 19990809-06:23 GMT+1 Victor Szel <info@szelvesz.hu>
    * include/memvars.ch
      ! #ifdef _MEMVARS_CH guard added.

harbour/source/rtl/console.c

@@ -59,6 +59,9 @@
 #else
   #include <io.h>
 #endif
+#if defined(__CYGWIN__)
+  #include <io.h>
+#endif
 #include <fcntl.h>
 #include "gtapi.h"            /* HARBOUR_USE_GTAPI is checked inside gtapi.h, so that
                                  we can always get the border styles */

harbour/source/rtl/mtran.c

@@ -83,7 +83,7 @@ HB_INIT_SYMBOLS_END( Memotran__InitSymbols );
 #pragma startup Memotran__InitSymbols
 #endif
 
-/* Note: pszResult must have an allocated buffer of at least */
+/* NOTE: pszResult must have an allocated buffer of at least */
 /*       ulStringLen */
 
 void hb_memotran( char *pszResult, ULONG *ulResultLen, char *pszString, ULONG ulStringLen, char cHardcr, char cSoftcr )

harbour/tests/working/block2.PRG

@@ -1,16 +0,0 @@
-// CodeBlocks management
-
-function Main()
-
-   local bBlock := GenBlock()
-
-   Eval( bBlock, "I am a ", "codeblock" )
-
-   QOut( "ok" )
-
-return nil
-
-function GenBlock()
-
-return { | c, d | QOut( c + d ) }
-

harbour/tests/working/dates4.prg

@@ -1,3 +1,7 @@
+/*
+ * $Id$
+ */
+
 // Testing Harbour dates management.
 #include "set.ch"
 

harbour/tests/working/strsub.prg

@@ -1,3 +1,6 @@
+/*
+ * $Id$
+ */
 
 // Testing strings concat
 

harbour/tests/working/testdbf.prg

@@ -1,3 +1,7 @@
+/*
+ * $Id$
+ */
+
 function main()
 
    local aStruct := { { "CHARACTER", "C", 25, 0 }, ;

harbour/tests/working/testpre.prg

@@ -1,3 +1,7 @@
+/*
+ * $Id$
+ */
+
 FUNCTION Main()
 
    LOCAL cString

harbour/tests/working/testrdd.prg

@@ -1,3 +1,7 @@
+/*
+ * $Id$
+ */
+
 function main()
 
    local aRdd := rddList()

harbour/tests/working/transdef.prg

@@ -1,3 +1,7 @@
+/*
+ * $Id$
+ */
+
 procedure main
 local a := 1, b := 5.22
    qout( "[" + transform( 1, "@B" ) + "]" )