2001-02-09 11:25 UTC-0800 Ron Pinkas <ron@profit-master.com>
* harbour/source/debug/debugger.prg
! Fixesd ValType( &cColor ) to Type( cColor )
* hb_slex.bc
* Synched with makefile.bc
This commit is contained in:
@@ -1,3 +1,9 @@
|
||||
2001-02-09 11:25 UTC-0800 Ron Pinkas <ron@profit-master.com>
|
||||
* harbour/source/debug/debugger.prg
|
||||
! Fixesd ValType( &cColor ) to Type( cColor )
|
||||
* hb_slex.bc
|
||||
* Synched with makefile.bc
|
||||
|
||||
2001-02-08 12:15 UTC-0500 David G. Holm <dholm@jsd-llc.com>
|
||||
|
||||
* config/dos/djgpp.cf
|
||||
|
||||
@@ -431,7 +431,8 @@ DEBUG_LIB_OBJS = \
|
||||
$(OBJ_DIR)\debugger.obj \
|
||||
$(OBJ_DIR)\dbgtarr.obj \
|
||||
$(OBJ_DIR)\dbgtobj.obj \
|
||||
$(OBJ_DIR)\tbrwtext.obj
|
||||
$(OBJ_DIR)\tbrwtext.obj \
|
||||
$(OBJ_DIR)\dbgwa.obj
|
||||
|
||||
#
|
||||
# COMMON.LIB rules
|
||||
@@ -2020,6 +2021,13 @@ $(OBJ_DIR)\dbgtobj.obj : $(OBJ_DIR)\dbgtobj.c
|
||||
$(CC) $(CLIBFLAGS) -o$@ $**
|
||||
tlib $(DEBUG_LIB) $(ARFLAGS) -+$@,,
|
||||
|
||||
$(OBJ_DIR)\dbgwa.c : $(DEBUG_DIR)\dbgwa.prg
|
||||
$(HARBOUR_EXE) $(HARBOURFLAGS) $** -o$@
|
||||
|
||||
$(OBJ_DIR)\dbgwa.obj : $(OBJ_DIR)\dbgwa.c
|
||||
$(CC) $(CLIBFLAGS) -o$@ $**
|
||||
tlib $(DEBUG_LIB) $(ARFLAGS) -+$@,,
|
||||
|
||||
#
|
||||
# GTCGI.LIB dependencies
|
||||
#
|
||||
|
||||
@@ -512,7 +512,7 @@ METHOD EditColor( nColor, oBrwColors ) CLASS TDebugger
|
||||
|
||||
SetCursor( SC_NORMAL )
|
||||
@ Row(), Col() GET cColor COLOR SubStr( ::ClrModal(), 5 ) ;
|
||||
VALID If( ValType( &cColor ) != "C", ( Alert( "Must be string" ), .f. ), .t. )
|
||||
VALID If( Type( cColor ) != "C", ( Alert( "Must be string" ), .f. ), .t. )
|
||||
|
||||
READ
|
||||
SetCursor( SC_NONE )
|
||||
|
||||
Reference in New Issue
Block a user