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

19991016-18:40 GMT+8 Ron Pinkas <Ron@Profit-Master.com>

Browse Source 
* harbour.y
          * Corrected bug with Push/Pop optimizer and BlockList.
This commit is contained in:
Ron Pinkas
1999-10-17 01:51:46 +00:00
parent 5315e24d5e
commit 10821a6d96
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 @@
19991016-18:40 GMT+8 Ron Pinkas <Ron@Profit-Master.com>
* harbour.y
* Corrected bug with Push/Pop optimizer and BlockList.
19991016-14:40 GMT+8 Ron Pinkas <Ron@Profit-Master.com>
* compiler.h
+ added lLstPushPos to PFUNCTION structure to support nesting (like in blocks ).

2
harbour/source/compiler/harbour.y
View File

@@ -1011,7 +1011,7 @@ CodeBlock : BlockBegin '|' BlockExpList '}' { CodeBlockEnd(); }
BlockBegin : '{' '|' { CodeBlockStart(); }
;
BlockExpList : { SetLastPushPos(); } Expression { $$ = 1; }
BlockExpList : Expression { $$ = 1; }
| ',' { SetLastPushPos(); PushNil(); RemoveExtraPush(); PushNil(); $$ = 2; }
| BlockExpList ',' { RemoveExtraPush(); PushNil(); $$++; }
| BlockExpList ',' { RemoveExtraPush(); } Expression { $$++; }