From 580846daf4c3fd19f62ddf47f2bd2e6ecab26b21 Mon Sep 17 00:00:00 2001 From: "David G. Holm" Date: Fri, 19 Jan 2001 23:44:06 +0000 Subject: [PATCH] 2001-01-19 18:30 UTC-0500 David G. Holm --- harbour/ChangeLog | 7 +++++++ harbour/source/rtl/gtcgi/Makefile | 2 +- harbour/source/vm/hvm.c | 4 ++-- 3 files changed, 10 insertions(+), 3 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 8eecc65530..fa39484fc4 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,10 @@ +2001-01-19 18:30 UTC-0500 David G. Holm + * 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) *harbour/hb_slex.vc * added HBMAKE diff --git a/harbour/source/rtl/gtcgi/Makefile b/harbour/source/rtl/gtcgi/Makefile index 8fedc2ecb6..ba34260a6d 100644 --- a/harbour/source/rtl/gtcgi/Makefile +++ b/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 diff --git a/harbour/source/vm/hvm.c b/harbour/source/vm/hvm.c index ca2d7b0976..ba3ea376a0 100644 --- a/harbour/source/vm/hvm.c +++ b/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 */