| 556 |
|
end; |
| 557 |
|
end; |
| 558 |
|
|
| 559 |
+ |
sqltCase: |
| 560 |
+ |
{case constructs can appear within select statement in nested blocks. |
| 561 |
+ |
We need to match the case constructs END token in order to parse the |
| 562 |
+ |
block correctly. This is a simple parser and the only objective is |
| 563 |
+ |
to determine the correct end of block. We therefore do not check to |
| 564 |
+ |
ensure that the next end properly matches the case. The CASE is thus |
| 565 |
+ |
treated the same as BEGIN. The Firebird SQL Parser will flag any errors |
| 566 |
+ |
due to mismatched CASE/BEGIN END} |
| 567 |
+ |
begin |
| 568 |
+ |
Inc(Nested); |
| 569 |
+ |
stmt += TokenText; |
| 570 |
+ |
end; |
| 571 |
+ |
|
| 572 |
|
sqltComment: |
| 573 |
|
stmt += '/*' + TokenText + '*/'; |
| 574 |
|
|
