testlinebreaking.obs

格式化源码的最新板

unit testlinebreaking;interface implementation uses sysutils;procedure thisisajobforreturninsertion
;var a,b:integer;begin a:=10;b:=2*a;end;function doublestring(const ps:string):string
;begin result:=ps+ps;end;procedure thisisajobforreturnremoval;var a,b:integer;begin
a :=10;b:=2*a ;end;procedure testtweaks;var a,b:integer;begin a:=random(20);if a<
10 then begin b:=a*2;end;if b<10 then a:=b*2;if b<10 then a:=b*2;a:=a*2;a:=a*2;end
;function thisfunctionnameisfourty_characters_long(const ps1,ps2:string):string;begin
result:=ps1+ps2;end;function addfloats(const pf1,pf2:extended):extended;begin result
:=pf1+pf2;end;procedure easypieces;var ls1,ls2,ls3:string;lf:extended;begin ls1:=
'this string is fourty characters long '+'this string is fourty characters long '
+'this string is fourty characters long ';ls1:='this string is not fourty characters'
+'this string is not fourty characters'+'this string is not fourty characters ';ls1
:='this string is not fourty chars'+'this string is not fourty chars'+'this string is not fourty chars'
;ls1:='this string is not chars'+'this string is not chars'+'this string is not chars'
;ls1:='this string is not'+'this string is not'+'this string is not';ls1:='this string is'
+'this string is'+'this string is';lf:=(1.23456789+2.34567890)*-12.34567890+(1.23456789
+2.34567890);lf:=(1.23456789+2.34567890)*-12.34567890+(1.23456789+2.34567890)*-12.34567890
;lf:=(1.23456789+2.34567890)*-12.34567890+(1.23456789+2.34567890)*-12.34567890+(1.23456789
+2.34567890);lf:=(1.23456789+2.34567890)*-12.34567890+((1.23456789+2.34567890)*-12.34567890
+(1.23456789+2.34567890));lf:=(1.23456789+2.34567890)*(-12.34567890+(1.23456789+2.34567890
)*-12.34567890)+(1.23456789+2.34567890)*-12.34567890+(1.23456789+2.34567890)*-12.34567890
;lf:=((1.23456789+2.34567890)*-12.34567890)+((1.23456789+2.34567890)*-12.34567890
)+((1.23456789+2.34567890)*-12.34567890)+((1.23456789+2.34567890)*-12.34567890);ls2
:=thisfunctionnameisfourty_characters_long('this string is fourty characters long '
,'this string is fourty characters long ');ls2:=thisfunctionnameisfourty_characters_long
('this string is characters long ','this string is characters long ');ls2:=thisfunctionnameisfourty_characters_long
('this string is long ','this string is long ');ls2:=thisfunctionnameisfourty_characters_long
('this string','this string');ls2:=thisfunctionnameisfourty_characters_long('this'
,'this');ls1:='this string is '+floattostrf(12.3456789012,ffexponent,8,9);ls1:='this string is getting '
+floattostrf(12.3456789012,ffexponent,8,9);ls1:='this string is getting longer '+
floattostrf(12.3456789012,ffexponent,8,9);ls1:='this string is getting longer and longer '
+floattostrf(12.3456789012,ffexponent,8,9);ls1:='this string is getting longer and longer and longer '
+floattostrf(12.3456789012,ffexponent,8,9);lf:=((1.23456789+2.34567890)*-12.34567890
)+((1.23456789+2.34567890));lf:=((1.23456789+2.34567890)*-12.34567890)+((1.23456789
+2.34567890));lf:=((1.23456789+2.34567890)*-12.34567890)+((1.23456789+2.34567890)
);lf:=((1.23456789+2.34567890)*-12.34567890)+((1.23456789+2.34567890));lf:=((1.23456789
+2.34567890)*-12.34567890)+((1.23456789+2.34567890));lf:=((1.23456789+2.34567890)
*-12.34567890)+((1.23456789+2.34567890));lf:=addfloats(2,2);lf:=addfloats(1.2345678901
,1.2345678901);lf:=addfloats(1.2345678901*-47,1.2345678901+12*-12);lf:=addfloats(
(1.2345678901*-47)+12.1234567890,1.2345678901+(12.0987654321*-12.987654321));lf:=
addfloats(((1.2345678901*-47)+12.1234567890)*(1.2345678901+(12.0987654321*-12.987654321
)),3);lf:=addfloats(((1.2345678901*-47)+12.1234567890)*(1.2345678901+(12.0987654321
*-12.987654321)),3*((1.2345678901*-47)+12.1234567890)*(1.2345678901+(12.0987654321
*-12.987654321)));lf:=addfloats(1.234,5.678);lf:=addfloats(addfloats(1.234,5.678)
,addfloats(1.234,5.678));lf:=addfloats(addfloats(addfloats(1.234,5.678),addfloats
(1.234,5.678)),addfloats(addfloats(1.234,5.678),addfloats(1.234,5.678)));lf:=addfloats
(addfloats(addfloats(1.234*addfloats(1.234,5.678),5.678-addfloats(1.234,5.678)),addfloats
(1.234,5.678)),addfloats(addfloats(1.234,5.678),addfloats(1.234,5.678)));end;procedure
breakit;var lsstring:string;begin lsstring:=doublestring('a');lsstring:=doublestring
('aa');lsstring:=doublestring('aaa');lsstring:=doublestring('aaaa');lsstring:=doublestring
('aaaaa');lsstring:=doublestring('aaaaaa');lsstring:=doublestring('aaaaaaa');lsstring
:=doublestring('aaaaaaaa');lsstring:=doublestring('aaaaaaaaa');lsstring:=doublestring
('aaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring(
'aaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring
('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring
('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring
('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring
('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring
('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring
('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');
lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');lsstring
:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');
lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'
);lsstring:=doublestring('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'