2001-01-19 18:30 UTC-0500 David G. Holm <dholm@jsd-llc.com>

harbour/ChangeLog

@@ -1,3 +1,10 @@
+2001-01-19 18:30 UTC-0500 David G. Holm <dholm@jsd-llc.com>
+  * source/rtl/gtcgi/Makefile
+    ! The library is supposed to be 'gtcgi', not 'gtstd'!
+
+  * source/vm/hvm.c
+    * Moved hb_inkeyPoll() call to inside the hb_vmDo() function.
+
 2001-01-18 22:41 GMT+1 JFL (Mafact) <jfl@mafact.com>
    *harbour/hb_slex.vc
     * added HBMAKE 

harbour/source/rtl/gtcgi/Makefile

@@ -8,6 +8,6 @@ C_SOURCES=\
 	gtcgi.c \
 	mousecgi.c \
 
-LIBNAME=gtstd
+LIBNAME=gtcgi
 
 include $(TOP)$(ROOT)config/lib.cf

harbour/source/vm/hvm.c

@@ -565,13 +565,11 @@ void hb_vmExecute( const BYTE * pCode, PHB_SYMB pSymbols )
          /* Execution */
 
          case HB_P_DO:
-            hb_inkeyPoll();           /* Poll the console keyboard */
             hb_vmDo( pCode[ w + 1 ] + ( pCode[ w + 2 ] * 256 ) );
             w += 3;
             break;
 
          case HB_P_DOSHORT:
-            hb_inkeyPoll();           /* Poll the console keyboard */
             hb_vmDo( pCode[ w + 1 ] );
             w += 2;
             break;
@@ -2789,6 +2787,8 @@ void hb_vmDo( USHORT uiParams )
 
    HB_TRACE(HB_TR_DEBUG, ("hb_vmDo(%hu)", uiParams));
 
+   hb_inkeyPoll();           /* Poll the console keyboard */
+
    pItem = hb_stackNewFrame( &sStackState, uiParams );
    pSym = pItem->item.asSymbol.value;
    pSelf = hb_stackSelfItem();   /* NIL, OBJECT or BLOCK */