git-svn-id: trunk@7546 -
@@ -679,6 +679,8 @@ begin
'F' :
begin
+ if more='' then
+ IllegalPara(opt);
c:=more[1];
Delete(more,1,1);
DefaultReplacements(More);
@@ -1031,6 +1033,8 @@ begin
'S' :
if more[1]='I' then
if upper(more)='ICOM' then