Changeset 73 for branches/Transpascal/Compiler/Analyze/UParser.pas
- Timestamp:
- Oct 20, 2010, 11:16:02 AM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/Transpascal/Compiler/Analyze/UParser.pas
r72 r73 85 85 begin 86 86 if NextToken <> Code then begin 87 ErrorMessage(SExpectedButFound, [Code, FNextToken], - 2);87 ErrorMessage(SExpectedButFound, [Code, FNextToken], -1); 88 88 89 89 // Recovery: try to find nearest same code
Note:
See TracChangeset
for help on using the changeset viewer.