ViewVC Help

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

root/public/ibx/trunk/runtime/nongui/ibxscript.pas

Comparing ibx/trunk/runtime/nongui/ibxscript.pas (file contents):
Revision 225 by tony, Tue Apr 3 09:09:05 2018 UTC vs.
Revision 227 by tony, Mon Apr 9 10:31:10 2018 UTC

#	Line 39 | Line 39 | const
39
40		BlobLineLength = 40;
41
42	+	DefaultTerminator = ';';
43	+
44		{Non-character symbols}
45		sqNone                 = #0;
46		sqEnd                  = #1;
#	Line 732 | Line 734 | begin
734		begin
735		with GetTransaction do
736		if InTransaction then Rollback;
737	+	FSymbolStream.Terminator := DefaultTerminator;
738		if assigned(OnErrorLog) then
739		begin
740		Add2Log(Format(sStatementError,[FSymbolStream.GetErrorPrefix,
#	Line 1933 | Line 1936 | end;
1936		constructor TSymbolStream.Create;
1937		begin
1938		inherited;
1939	<	FTerminator := ';';
1939	>	FTerminator := DefaultTerminator;
1940		NextStatement;
1941		end;
1942

Diff Legend

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