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