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

2001-06-21 14:05 UTC-0800 Ron Pinkas <ron@profit-master.com>

Browse Source 
* contrib/dot/pp.prg
     + Revised explicit support for Extended expression match marker, in NextExp() to use normal logic for () expresiions.
This commit is contained in:
Ron Pinkas
2001-06-21 21:06:48 +00:00
parent d5220415d2
commit 0c9194fe64
2 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -1,3 +1,7 @@
2001-06-21 14:05 UTC-0800 Ron Pinkas <ron@profit-master.com>
* contrib/dot/pp.prg
+ Revised explicit support for Extended expression match marker, in NextExp() to use normal logic for () expresiions.
2001-06-21 10:50 UTC-0800 Ron Pinkas <ron@profit-master.com>
* contrib/dot/pp.prg
! Changed MatchRule() to set sNextAnchor (for NextExp()) by skipping to next NON optional Anchor.

2
harbour/contrib/dot/pp.prg
View File

@@ -4157,7 +4157,7 @@ STATIC FUNCTION NextExp( sLine, cType, aWords, aExp, sNextAnchor, bX )
//? "EXP <*>: " + sExp
RETURN sExp
CASE cType == '('
CASE cType == '(' .AND. Left( sLine, 1 ) != '('
nSpaceAt := At( ' ', sLine )
IF nSpaceAt = 0