Unneeded extra variables incl stack ones & stuff lines, smth like :
------------------------
procedure strfunc(): msestring;
begin
result:= 'The string result:'
if 1 <> 2 then
result:= result + 'mumu';
else
result:= result + 'koko';
end;
end;
We have 6 non-stuff lines & 7 body lines.
------------------
procedure strfunc(): msestring;
var
s: msestring;
begin
if 1 <> 2 then
st:= 'mumu';
else
s:= 'koko';
end;
return 'The string result:' + s;
end;
We have 7 non-stuff lines (+16%) & 9 body lines (+28%).
------------------------------------------------------------------------------
Shape the Mobile Experience: Free Subscription
Software experts and developers: Be at the forefront of tech innovation.
Intel(R) Software Adrenaline delivers strategic insight and game-changing
conversations that shape the rapidly evolving mobile landscape. Sign up now.
http://pubads.g.doubleclick.net/gampad/clk?id=63431311&iu=/4140/ostg.clktrk
_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
