| 651 | |
| 652 | |
| 653 | ULONG PAR_marks(Jrd::CompilerScratch* csb) |
| 654 | { |
| 655 | if (csb->csb_blr_reader.getByte() != blr_marks) |
| 656 | PAR_syntax_error(csb, "blr_marks"); |
| 657 | |
| 658 | switch (csb->csb_blr_reader.getByte()) |
| 659 | { |
| 660 | case 1: |
| 661 | return csb->csb_blr_reader.getByte(); |
| 662 | |
| 663 | case 2: |
| 664 | return csb->csb_blr_reader.getWord(); |
| 665 | |
| 666 | case 4: |
| 667 | return csb->csb_blr_reader.getLong(); |
| 668 | } |
| 669 | PAR_syntax_error(csb, "valid length for blr_marks value (1, 2, or 4)"); |
| 670 | return 0; |
| 671 | } |
| 672 | |
| 673 | CompilerScratch* PAR_parse(thread_db* tdbb, const UCHAR* blr, ULONG blr_length, |
| 674 | bool internal_flag, ULONG dbginfo_length, const UCHAR* dbginfo) |
no test coverage detected