fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2002-07-12 18:58 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>

Browse Source
This commit is contained in:
Alexander S.Kresin
2002-07-12 14:56:22 +00:00
parent 346520e0e3
commit 7798e40aa9
2 changed files with 8 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/source/debug/debugger.prg
View File

@@ -1960,8 +1960,10 @@ static function DoCommand( o,cCommand )
for i := 1 to nLocals
vtmp := __mvGet( o:aCallStack[1][2][i][1] )
if vtmp != __vmVarLGet( nProcLevel, o:aCallStack[1][2][i][2] )
__vmVarLSet( nProcLevel, o:aCallStack[1][2][i][2], vtmp )
if Valtype( vtmp ) != "A"
if vtmp != __vmVarLGet( nProcLevel, o:aCallStack[1][2][i][2] )
__vmVarLSet( nProcLevel, o:aCallStack[1][2][i][2], vtmp )
endif
endif
next