ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/trunk/fbintf/IBUtils.pas

Comparing ibx/trunk/fbintf/IBUtils.pas (file contents):
Revision 286 by tony, Fri Jan 18 11:10:37 2019 UTC vs.
Revision 287 by tony, Thu Apr 11 08:51:23 2019 UTC

#	Line 280 | Line 280 | type
280		sqltOpenBracket,
281		sqltCloseBracket,
282		sqltPipe,
283	+	sqltMinus,
284		sqltConcatSymbol,
285		sqltLT,
286		sqltGT,
#	Line 1036 | Line 1037 | begin
1037		Result := Result + '/*' + TokenText + '*/';
1038
1039		sqltCommentLine:
1040	<	Result := Result + '//' + TokenText + LineEnding;
1040	>	Result := Result + '--' + TokenText + LineEnding;
1041
1042		sqltEOL:
1043		Result := Result + LineEnding;
#	Line 1210 | Line 1211 | begin
1211		Result := sqltOpenSquareBracket;
1212		']':
1213		Result := sqltCloseSquareBracket;
1214	+	'-':
1215	+	Result := sqltMinus;
1216		'<':
1217		Result := sqltLT;
1218		'>':
#	Line 1482 | Line 1485 | begin
1485		GetNext;
1486		FState := stInComment;
1487		end
1488	<	else
1489	<	if FNextToken = sqltForwardSlash then
1488	>	end;
1489	>
1490	>	sqltMinus:
1491	>	begin
1492	>	if FNextToken = sqltMinus then
1493		begin
1494		FString := '';
1495		GetNext;

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines