2008-08-22 11:20 UTC+0100 JF Lefebvre (MAFACT) (jfl at mafact dot com)
This commit is contained in:
@@ -8,6 +8,18 @@
|
||||
2008-12-31 13:59 UTC+0100 Foo Bar <foo.bar@foobar.org>
|
||||
*/
|
||||
|
||||
|
||||
2008-08-22 11:20 UTC+0100 JF Lefebvre (MAFACT) (jfl at mafact dot com)
|
||||
* utils/hbdoc/hbdoc.prg
|
||||
* utils/hbmake/Makefile
|
||||
* utils/hbmake/hbmake.prg
|
||||
% removing 'ANNOUNCE RDDSYS', not anymore needed
|
||||
causing some problem with msvc linking.
|
||||
* debug/debugger.prg
|
||||
% changing all GTI_ by HB_GTI_
|
||||
|
||||
|
||||
|
||||
2008-08-22 09:32 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
|
||||
* common.mak
|
||||
* source/vm/debug.c
|
||||
|
||||
@@ -408,13 +408,13 @@ METHOD New() CLASS HBDebugger
|
||||
METHOD OpenDebuggerWindow() CLASS HBDebugger
|
||||
|
||||
IF !::lDebuggerWindowIsOpen
|
||||
::hUserWindow := hb_gtInfo( GTI_GETWIN )
|
||||
::hUserWindow := hb_gtInfo( HB_GTI_GETWIN )
|
||||
IF ::hDebuggerWindow == NIL
|
||||
::hDebuggerWindow := hb_gtInfo( GTI_GETWIN, ;
|
||||
::hDebuggerWindow := hb_gtInfo( HB_GTI_GETWIN, ;
|
||||
{ "Debugger", DEBUGGER_MINROW, DEBUGGER_MINCOL, ;
|
||||
DEBUGGER_MAXROW, DEBUGGER_MAXCOL } )
|
||||
ELSE
|
||||
hb_gtInfo( GTI_SETWIN, ::hDebuggerWindow )
|
||||
hb_gtInfo( HB_GTI_SETWIN, ::hDebuggerWindow )
|
||||
ENDIF
|
||||
::lDebuggerWindowIsOpen := .T.
|
||||
ENDIF
|
||||
@@ -425,8 +425,8 @@ METHOD OpenDebuggerWindow() CLASS HBDebugger
|
||||
METHOD CloseDebuggerWindow() CLASS HBDebugger
|
||||
|
||||
IF ::lDebuggerWindowIsOpen
|
||||
::hDebuggerWindow := hb_gtInfo( GTI_GETWIN )
|
||||
hb_gtInfo( GTI_SETWIN, ::hUserWindow )
|
||||
::hDebuggerWindow := hb_gtInfo( HB_GTI_GETWIN )
|
||||
hb_gtInfo( HB_GTI_SETWIN, ::hUserWindow )
|
||||
::lDebuggerWindowIsOpen := .F.
|
||||
ENDIF
|
||||
|
||||
|
||||
@@ -108,8 +108,6 @@
|
||||
* Fixed the help text when hbdoc is called with out any parameter
|
||||
*/
|
||||
|
||||
ANNOUNCE RDDSYS
|
||||
|
||||
#include "directry.ch"
|
||||
#include "fileio.ch"
|
||||
#include "inkey.ch"
|
||||
|
||||
@@ -55,8 +55,6 @@
|
||||
* added suport to OS Unix
|
||||
*/
|
||||
|
||||
ANNOUNCE RDDSYS
|
||||
|
||||
#include "fileio.ch"
|
||||
#include "common.ch"
|
||||
#include "inkey.ch"
|
||||
|
||||
Reference in New Issue
Block a user